Changeset 464 for trunk/gui/scripts/scroller.tcl

Timestamp:

Jun 6, 2006 10:33:16 AM (18 years ago)

Author:

mmc

Message:

Added popup options for the "download" button. Right now this works
only for <curve> objects. You can select between CSV and PDF output.
Will add other formats later.

Fixed a few "after cancel" errors that were happening when you switch
between inputs in the structure demo.

Fixed the colors and fonts for the new bug report window.

File:

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

trunk/gui/scripts/scroller.tcl

@@ -30 +30 @@
 
     constructor {args} { # defined below }
+    destructor { # defined below }
 
     public method contents {{frame "!@#query"}}
@@ -90 +91 @@
 
     eval itk_initialize $args
+}
+
+# ----------------------------------------------------------------------
+# DESTRUCTOR
+# ----------------------------------------------------------------------
+itcl::body Rappture::Scroller::destructor {} {
+    after cancel [itcl::code $this _lock reset x]
+    after cancel [itcl::code $this _lock reset y]
 }