diff options
author | N.N. <matju@users.sourceforge.net> | 2009-05-17 03:22:00 +0000 |
---|---|---|
committer | N.N. <matju@users.sourceforge.net> | 2009-05-17 03:22:00 +0000 |
commit | b5c24e0e57e924498e34dea43992d65af1b5a31f (patch) | |
tree | 070c51bcc63241e8d70f5c3f79cb71d37dbd0dcd /desiredata/src/desire.tk | |
parent | fdfe04654ff347d6025c23ab8bc2d2b61b2154a1 (diff) |
move language list to where it belongs... but desire.tk still has several language lists... sorry
svn path=/trunk/; revision=11418
Diffstat (limited to 'desiredata/src/desire.tk')
-rw-r--r-- | desiredata/src/desire.tk | 16 |
1 files changed, 5 insertions, 11 deletions
diff --git a/desiredata/src/desire.tk b/desiredata/src/desire.tk index f213b588..0d883cdb 100644 --- a/desiredata/src/desire.tk +++ b/desiredata/src/desire.tk @@ -749,13 +749,6 @@ for {set i 0} {$i < $argc} {incr i} { #set cmdline(server) \"$cmdline(server)\" set encoding "" -set langoptions { - english francais deutsch catala espanol portugues italiano bokmal - euskara polski dansk chinese nihongo brasileiro turkce nederlands - russkij - -} -#lappend langoptions {chinese} #lappend langoptions {esperanto} set langfile locale/[switch -regexp -- $language { ^(en|english|C)$ {list english} @@ -8252,7 +8245,8 @@ section Client others toggle View tooltip toggle Wire wirearrow integer Client console - choice View language + language View language + language View language2 integer Canvas pointer_sense } @@ -8375,9 +8369,9 @@ def ClientPrefsDialog init {} { set which_section .$subself.main.$subsection set which_self $subself } - choice { - set @$name $look(View:language) - $self add $which_section [list $name $type -choices $::langoptions] + language { + set @$name $look(View:$name) + $self add $which_section [list $name choice -choices $::langoptions] } color { set str [string tolower $class$name] |