diff options
Diffstat (limited to 'library/graph.tcl')
-rw-r--r-- | library/graph.tcl | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/library/graph.tcl b/library/graph.tcl index 8c4fd8d..93988d3 100644 --- a/library/graph.tcl +++ b/library/graph.tcl @@ -524,9 +524,9 @@ proc blt::ZoomStack::Pop { g } { set _private($g,stack) [lrange $zoomStack 1 end] eval $cmd TitleLast $g - blt::busy hold $g +# blt::busy hold $g update - blt::busy release $g +# blt::busy release $g after 2000 [list blt::ZoomStack::DestroyTitle $g] } else { catch { $g marker delete "zoomTitle" } @@ -593,9 +593,9 @@ proc blt::ZoomStack::Push { g } { return } } - blt::busy hold $g +# blt::busy hold $g update; # This "update" redraws the graph - blt::busy release $g +# blt::busy release $g } proc blt::ZoomStack::SetAxisRanges { g axis min max } { |