Changeset 6310

Timestamp:

May 4, 2016, 10:09:48 AM (8 years ago)

Author:

gah

Message:

fixes -load causing simulation

Location:

branches/1.7/gui/scripts

Files:

• gauge.tcl (modified) (1 diff)
• main.tcl (modified) (2 diffs)
• nanovisviewer.tcl (modified) (3 diffs)

branches/1.7/gui/scripts/gauge.tcl

@@ -639 +639 @@
         $itk_component(uq) configure -state $itk_option(-state)
     }
-    _redraw  ;# fix gauge
+    _redraw;                            # Fix gauge
 }
 

branches/1.7/gui/scripts/main.tcl

@@ -382 +382 @@
 
 # load previous xml runfiles
+update
 if {[llength $params(-load)] > 0} {
     foreach runobj $loadobjs {
@@ -394 +395 @@
     }
     $f.analyze configure -notebookpage analyze
+    $win.pager configure -nosim 1 
     $win.pager current analyzer
+    $win.pager configure -nosim 0 
 } elseif {$params(-simset) ne ""} {
     $f.analyze reload $params(-simset)

branches/1.7/gui/scripts/nanovisviewer.tcl

@@ -502 +502 @@
         if { $pos >= 0 } {
             set _dlist [lreplace $_dlist $pos $pos]
+            # Don't remove the limits settings because we're not really
+            # deleting the volume, just hiding it.
+            #array unset _limits $dataobj*
             array unset _obj2ovride $dataobj-*
             set changed 1
@@ -794 +797 @@
 
     if { [info exists _isomarkers($tf)] } {
+        # The "visible" isomarker method below implicitly calls "absval".
+        # It uses the screen position of the marker to compute the absolute
+        # value.  So make sure the window size has been computed before
+        # calling "visible".
+        update idletasks
+        update 
         foreach m $_isomarkers($tf) {
             $m visible yes
@@ -916 +925 @@
     # settings since the user may have created/deleted/moved markers.
 
+    # The "visible" isomarker method below implicitly calls "absval".  It
+    # uses the screen position of the marker to compute the absolute value.
+    # So make sure the window size has been computed before calling
+    # "visible".
+    update idletasks
+    update 
     foreach tf [array names _isomarkers] {
         foreach m $_isomarkers($tf) {