Changeset 2159

Timestamp:

Mar 28, 2011 10:24:40 AM (12 years ago)

Author:

mmc

Message:

Some minor fixes to make the builder work properly. Also, moved up
"wm withdraw" command in main.tcl to avoid getting a flash on the screen.
Changed the boolean control to use yes/no instead of "yes"/"no".

Location:

trunk/gui/scripts

Files:

• controls.tcl (modified) (2 diffs)
• editor.tcl (modified) (1 diff)
• main.tcl (modified) (2 diffs)
• switch.tcl (modified) (2 diffs)

trunk/gui/scripts/controls.tcl

@@ -421 +421 @@
             set vwidget $_name2info($name-value)
             if {[lsearch -exact {group image structure} $type] >= 0} {
-                if {$show} {
+                if {$show ne "" && $show} {
                     lappend showing $name
                 } else {
@@ -429 +429 @@
                 # show other objects, but enable/disable them
                 lappend showing $name
-                if {$show} {
+                if {$show ne "" && $show} {
                     if {[winfo exists $vwidget]} {
                         $vwidget configure -state normal

trunk/gui/scripts/editor.tcl

@@ -162 +162 @@
     wm deiconify $itk_component(hull)
     raise $itk_component(hull)
-    focus $itk_component(editor)
+    focus -force $itk_component(editor)
 
     # try to grab the pointer, and keep trying...

trunk/gui/scripts/main.tcl

@@ -21 +21 @@
 #  redistribution of this file, and for a DISCLAIMER OF ALL WARRANTIES.
 # ======================================================================
+
+# take the main window down for now, so we can avoid a flash on the screen
+wm withdraw .
+
 package require Itcl
 package require Img
@@ -184 +188 @@
 # MAIN WINDOW
 # ----------------------------------------------------------------------
-wm withdraw .
 Rappture::MainWin .main -borderwidth 0
 .main configure -title [$tool xml get tool.title]

trunk/gui/scripts/switch.tcl

@@ -108 +108 @@
         }
         if {$itk_option(-showtext)} {
-            set text "\"yes\""
+            set text "yes"
         }
     } else {
@@ -115 +115 @@
         }
         if {$itk_option(-showtext)} {
-            set text "\"no\""
+            set text "no"
         }
     }