aboutsummaryrefslogtreecommitdiff
path: root/desiredata/src
diff options
context:
space:
mode:
authorN.N. <matju@users.sourceforge.net>2009-05-17 05:26:03 +0000
committerN.N. <matju@users.sourceforge.net>2009-05-17 05:26:03 +0000
commitc912c997a45f406f7e1da40867f398a2765bec33 (patch)
tree54a37722b5ffb6d1f85d5005af4266182f091d80 /desiredata/src
parenteabfb51e29aeb1b86e8796b3deabea8e1387e1a6 (diff)
fix the autolanguage thing
svn path=/trunk/; revision=11423
Diffstat (limited to 'desiredata/src')
-rw-r--r--desiredata/src/desire.tk5
1 files changed, 4 insertions, 1 deletions
diff --git a/desiredata/src/desire.tk b/desiredata/src/desire.tk
index 3dd02c53..cf1cd852 100644
--- a/desiredata/src/desire.tk
+++ b/desiredata/src/desire.tk
@@ -8304,7 +8304,10 @@ def ClientPrefsDialog get_val {} {
}
toggle { set look($class:$name) $@$name}
integer {set look($class:$name) $@$name}
- choice|language {set look($class:$name) $@$name}
+ choice|language {
+ if {$@$name == "autolanguage"} {set l auto} {set l $@$name}
+ set look($class:$name) $l
+ }
#font {set look(View:font) $@str}
}
}