Changeset 50 for trunk/gui/scripts/textresult.tcl

Timestamp:

Aug 28, 2005, 9:09:01 PM (19 years ago)

Author:

mmc

Message:

Added support for file transfer with the desktop. Each Rappture
application acts like an http server, configured to listen on
a particular port according to the parameters found in the file
~/data/sessions/$SESSION/resources. When the server is active,
the GUI has a "Download..." button in the results area. A Java
client (in the filexfer directory) connects to the server and
listens for download requests. When the user clicks on "Download...",
the desired result is spooled to a file, and a Java client pops up
a web page requesting the file. This downloads the result to the
user's desktop.

Note that if the $SESSION environment variable is not set, these
changes do nothing.

File:

• trunk/gui/scripts/textresult.tcl (modified) (2 diffs)

trunk/gui/scripts/textresult.tcl

@@ -29 +29 @@
     public method delete {args}
     public method scale {args}
+    public method download {}
 
     public method select {option args}
@@ -241 +242 @@
 
 # ----------------------------------------------------------------------
+# USAGE: download
+#
+# Clients use this method to create a downloadable representation
+# of the plot.  Returns a list of the form {ext string}, where
+# "ext" is the file extension (indicating the type of data) and
+# "string" is the data itself.
+# ----------------------------------------------------------------------
+itcl::body Rappture::TextResult::download {} {
+    return [list .txt [$itk_component(text) get 1.0 end]]
+}
+
+# ----------------------------------------------------------------------
 # USAGE: select all
 #