From 08aa3c1a5dab76e06fc3d23cc854723bcc7831f5 Mon Sep 17 00:00:00 2001 From: "N.N." Date: Wed, 13 May 2009 22:16:19 +0000 Subject: brasileiro svn path=/trunk/; revision=11321 --- desiredata/src/desire.tk | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) (limited to 'desiredata/src') diff --git a/desiredata/src/desire.tk b/desiredata/src/desire.tk index 0f30173b..6cc7d16a 100644 --- a/desiredata/src/desire.tk +++ b/desiredata/src/desire.tk @@ -751,7 +751,7 @@ for {set i 0} {$i < $argc} {incr i} { set encoding "" set langoptions { english francais deutsch catala espanol portugues italiano bokmal - euskara polski dansk chinese nihongo brasiliano turkce nederlands + euskara polski dansk chinese nihongo brasileiro turkce nederlands russkij } @@ -772,7 +772,7 @@ set langfile locale/[switch -regexp -- $language { ^(pl|polski)$ {set encoding utf-8; list polski} ^(dk|dansk)$ {list dansk} ^(ja|japanese|nihongo)$ {list nihongo} - ^(br|brasiliano|brasileiro)$ {list brasiliano} + ^(br|brasiliano|brasileiro)$ {list brasileiro} ^(tr|turkce)$ {set encoding utf-8; list turkce} ^(nl|nederlands)$ {list nederlands} ^(ru|russkij)$ {set encoding utf-8; list russkij} @@ -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 {$c.1 yview scroll [expr {-2-abs(%D)/%D}] units} }} set @lines 0 } @@ -1971,7 +1971,7 @@ def Canvas bind {eventtype selector args} { } def Canvas osx_scroll {axis diff} { - $self scroll $axis [expr -abs($diff)/%diff] + $self scroll $axis [expr -abs($diff)/%diff] } def Canvas new_binds {} { -- cgit v1.2.1