Changeset 3845 for trunk/gui/scripts/vtkviewer.tcl

Timestamp:

Jul 30, 2013, 10:30:20 AM (11 years ago)

Author:

gah

Message:

fix to write binary image

File:

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

trunk/gui/scripts/vtkviewer.tcl

@@ -907 +907 @@
         if 0 {
             set f [open "last.ppm" "w"] 
-            puts $f $bytes
+            fconfigure $f -encoding binary
+            puts -nonewline $f $bytes
             close $f
         }