From 5218f413a6b4266f48f0c635eec73fa2e89f30ca Mon Sep 17 00:00:00 2001 From: "N.N." Date: Wed, 13 May 2009 22:38:46 +0000 Subject: i hope this fixes scrollbar in Console on OSX. meanwhile, def Canvas osx_scroll is a mystery (i don't recall how we fixed it) svn path=/trunk/; revision=11323 --- desiredata/src/desire.tk | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'desiredata/src') diff --git a/desiredata/src/desire.tk b/desiredata/src/desire.tk index 817e6f9f..e7df6b9f 100644 --- a/desiredata/src/desire.tk +++ b/desiredata/src/desire.tk @@ -832,7 +832,7 @@ def Console init {c} { pack $c -fill both -expand yes $c.2 set 0.0 1.0 switch $::OS { osx { - bind $c.1 {$c.1 yview scroll [expr {-2-abs(%D)/%D}] units} + bind $c.1 [list $c.1 yview scroll [expr {-2-abs(%D)/%D}] units] }} set @lines 0 } -- cgit v1.2.1