summaryrefslogtreecommitdiffstats
path: root/library/msgcat
diff options
context:
space:
mode:
authoroehhar <harald.oehlmann@elmicron.de>2015-06-26 15:16:34 (GMT)
committeroehhar <harald.oehlmann@elmicron.de>2015-06-26 15:16:34 (GMT)
commit4acadf8d7735df752772eb9708d76bb81d6cecf4 (patch)
tree6b885a5cbcd34339fa0405d4a9ed81b3d982df82 /library/msgcat
parent23f6fa6d86cce6e3841ecdaf19957d0313407f28 (diff)
downloadtcl-4acadf8d7735df752772eb9708d76bb81d6cecf4.zip
tcl-4acadf8d7735df752772eb9708d76bb81d6cecf4.tar.gz
tcl-4acadf8d7735df752772eb9708d76bb81d6cecf4.tar.bz2
Tests for mcexists and mcloadedlocales
Diffstat (limited to 'library/msgcat')
-rwxr-xr-xlibrary/msgcat/msgcat.tcl2
1 files changed, 1 insertions, 1 deletions
diff --git a/library/msgcat/msgcat.tcl b/library/msgcat/msgcat.tcl
index 8bef081..0991f1c 100755
--- a/library/msgcat/msgcat.tcl
+++ b/library/msgcat/msgcat.tcl
@@ -248,7 +248,7 @@ proc msgcat::mcexists {args} {
set ns [uplevel 1 [list ::namespace current]]
set loclist [PackagePreferences $ns]
- while {[llength $args] > 1} {
+ while {[llength $args] != 1} {
set args [lassign $args option]
switch -glob -- $option {
-exactnamespace { set exactnamespace 1 }