Changeset 774 for trunk

Timestamp:

Jul 9, 2007 8:54:12 AM (17 years ago)

Author:

mmc

Message:

Downloading of binary data within <string> objects was broken because
the code couldn't figure out an appropriate file extension. Fixed to
use ".dat" for binary data and ".txt" for ASCII data, by default.

File:

• trunk/gui/scripts/textresult.tcl (modified) (1 diff)

trunk/gui/scripts/textresult.tcl

@@ -308 +308 @@
 
             set ext [$_dataobj get filetype]
-            if {"" == $ext && ![Rappture::encoding::is binary $val]} {
-                set ext ".txt"
+            if {"" == $ext} {
+                if {[Rappture::encoding::is binary $val]} {
+                    set ext ".dat"
+                } else {
+                    set ext ".txt"
+                }
             }
             return [list $ext $val]