[Sumover-dev] [svn commit] r3991 - rat/trunk
sumover-dev at cs.ucl.ac.uk
sumover-dev at cs.ucl.ac.uk
Wed May 2 11:37:52 BST 2007
Author: piers
Date: Wed May 2 11:37:07 2007
New Revision: 3991
Modified:
rat/trunk/uicomponent_chart.tcl
Log:
Fixed matrix display so that it draw the matrix correctly with new larger button sizes (needed for Aqua Tk).
Modified: rat/trunk/uicomponent_chart.tcl
==============================================================================
--- rat/trunk/uicomponent_chart.tcl (original)
+++ rat/trunk/uicomponent_chart.tcl Wed May 2 11:37:07 2007
@@ -38,9 +38,9 @@
# help again.....
if {[winfo width $window] > [winfo height $window]} {
set xpos [expr [winfo pointerx $window] + 10]
- set ypos [expr [winfo rooty $window] + [winfo height $window] + 4]
+ set ypos [expr [winfo rooty $window] + [winfo height $window] + 5]
} else {
- set xpos [expr [winfo rootx $window] + [winfo width $window] + 4]
+ set xpos [expr [winfo rootx $window] + [winfo width $window] + 5]
set ypos [expr [winfo pointery $window] + 10]
}
More information about the Sumover-dev
mailing list