summaryrefslogtreecommitdiffstats
path: root/tests/msgcat.test
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2012-11-16 10:16:18 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2012-11-16 10:16:18 (GMT)
commit7655c307f652206c12c3b5b2b2dd4953c12c5384 (patch)
treed1228156a1605cc574c7e8635fef3e781f172c62 /tests/msgcat.test
parent8a45c3faf392af5c64589268d0d7699c17b7feec (diff)
downloadtcl-7655c307f652206c12c3b5b2b2dd4953c12c5384.zip
tcl-7655c307f652206c12c3b5b2b2dd4953c12c5384.tar.gz
tcl-7655c307f652206c12c3b5b2b2dd4953c12c5384.tar.bz2
Fix msgcat.test (in case a higher msgcat version is encountered, which is not included with Tcl 8.4)
<p>Doc fix in TCL_MEM_DEBUG.3
Diffstat (limited to 'tests/msgcat.test')
-rw-r--r--tests/msgcat.test7
1 files changed, 7 insertions, 0 deletions
diff --git a/tests/msgcat.test b/tests/msgcat.test
index 237a482..3440106 100644
--- a/tests/msgcat.test
+++ b/tests/msgcat.test
@@ -55,6 +55,13 @@ namespace eval ::msgcat::test {
if {[info exists ::tcl::mac::locale]} {
set result [string tolower $::tcl::mac::locale]
} else {
+ if {([info sharedlibextension] == ".dll")
+ && ![catch {package require registry}]} {
+ # Windows and Cygwin have other ways to determine the
+ # locale when the environment variables are missing
+ # and the registry package is present
+ continue
+ }
set result c
}
}