Changeset 91585e2 in tol for tolbase/lib/toltk/graph.tcl
- Timestamp:
- Dec 20, 2016, 9:55:03 AM (10 years ago)
- Branches:
- 1941-docker-image-to-test, devel, master
- Children:
- 820bb4e
- Parents:
- 5e157f6
- File:
-
- 1 edited
-
tolbase/lib/toltk/graph.tcl (modified) (2 diffs)
Legend:
- Unmodified
- Added
- Removed
-
tolbase/lib/toltk/graph.tcl
r5e157f6 r91585e2 28 28 rename ::rbc::busy _rbc_busy 29 29 interp alias {} ::rbc::busy {} Busy_Patched 30 puts "interp alias {} ::rbc::busy {} Busy_Patched"30 #@ puts "interp alias {} ::rbc::busy {} Busy_Patched" 31 31 } 32 32 … … 59 59 rbc::AddBindTag $graph scroll-$graph 60 60 } elseif { [regexp "zoom-*" $mode] } { 61 puts "mode = $mode"61 #@ puts "mode = $mode" 62 62 bind zoom-$graph <ButtonPress-1> { rbc::SetZoomPoint %W %x %y } 63 63 if { [string equal $mode zoom-frame] } {
Note: See TracChangeset
for help on using the changeset viewer.
