diff options
author | N.N. <matju@users.sourceforge.net> | 2009-05-13 22:18:19 +0000 |
---|---|---|
committer | N.N. <matju@users.sourceforge.net> | 2009-05-13 22:18:19 +0000 |
commit | c6d109966c9916240a4f618f4c5f2103c0d4c905 (patch) | |
tree | 66bd80ccb886946385b3e7ec5da4145122ec203c | |
parent | 08aa3c1a5dab76e06fc3d23cc854723bcc7831f5 (diff) |
re-fix OSX scroll
svn path=/trunk/; revision=11322
-rw-r--r-- | desiredata/src/desire.tk | 4 |
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 |