aboutsummaryrefslogtreecommitdiff
path: root/desiredata/src/desire.tk
diff options
context:
space:
mode:
authorN.N. <matju@users.sourceforge.net>2009-05-13 22:18:19 +0000
committerN.N. <matju@users.sourceforge.net>2009-05-13 22:18:19 +0000
commitc6d109966c9916240a4f618f4c5f2103c0d4c905 (patch)
tree66bd80ccb886946385b3e7ec5da4145122ec203c /desiredata/src/desire.tk
parent08aa3c1a5dab76e06fc3d23cc854723bcc7831f5 (diff)
re-fix OSX scroll
svn path=/trunk/; revision=11322
Diffstat (limited to 'desiredata/src/desire.tk')
-rw-r--r--desiredata/src/desire.tk4
1 files changed, 1 insertions, 3 deletions
diff --git a/desiredata/src/desire.tk b/desiredata/src/desire.tk
index 6cc7d16a..817e6f9f 100644
--- a/desiredata/src/desire.tk
+++ b/desiredata/src/desire.tk
@@ -1970,9 +1970,7 @@ def Canvas bind {eventtype selector args} {
}
}
-def Canvas osx_scroll {axis diff} {
- $self scroll $axis [expr -abs($diff)/%diff]
-}
+def Canvas osx_scroll {axis diff} {$self scroll $axis [expr -abs($diff)/$diff]}
def Canvas new_binds {} {
# mouse buttons