Changeset 1943 for trunk/gui/scripts/htmlviewer.tcl

Timestamp:

Nov 12, 2010 9:16:17 AM (13 years ago)

Author:

gah

Message:

add unit cell to molvisviewer

File:

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

trunk/gui/scripts/htmlviewer.tcl

@@ -341 +341 @@
         }
     }
-    return [Rappture::icon exclaim]
+    # The htmlwidget assumes it owns the image and will delete it.
+    # Always create a copy of the image.
+    set img [Rappture::icon exclaim]
+    set file [$img configure -file]
+    set img [image create photo -file $file]
+    return $img
 }