Changeset 11 for trunk/gui/scripts/spectrum.tcl

Timestamp:

May 30, 2005, 9:33:49 PM (19 years ago)

Author:

mmc

Message:

Major reorganization of the entire package. The config.xml file
is now irrelevant. All the action is in the tool.xml file. The
main program now organizes all input into 1) side-by-side pages,
2) input/result (wizard-style) pages, or 3) a series of wizard-
style pages. The <input> can have <phase> parts representing
the various pages.

Added a new ContourResult? widget based on Swaroop's vtk plotting
code.

Also, added easymesh and showmesh to the "tools" directory.
We need these for Eric Polizzi's code.

File:

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

trunk/gui/scripts/spectrum.tcl

@@ -14 +14 @@
 # ======================================================================
 #  AUTHOR:  Michael McLennan, Purdue University
-#  Copyright (c) 2004  Purdue Research Foundation, West Lafayette, IN
+#  Copyright (c) 2004-2005
+#  Purdue Research Foundation, West Lafayette, IN
 # ======================================================================
 package require Itk
@@ -160 +161 @@
         error "wrong # args: should be \"get ?-color|-fraction? ?value?\""
     }
+
     set value [lindex $args 0]
-
-    set value [Rappture::Units::convert $value \
-        -context $units -to $units -units off]
+    if {$units != ""} {
+        set value [Rappture::Units::convert $value \
+            -context $units -to $units -units off]
+    }
 
     switch -- $what {