summaryrefslogtreecommitdiffstats
path: root/tests/cmdAH.test
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2018-10-17 19:51:47 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2018-10-17 19:51:47 (GMT)
commite0209e39ea32294ee016d240fd1dfe9411469832 (patch)
treef7526e3966ad91dbb1472bdcdcb21fde193f4d4e /tests/cmdAH.test
parent6d88b01d1e2bb2a76d4e0f094f1e895e3b16c859 (diff)
downloadtcl-e0209e39ea32294ee016d240fd1dfe9411469832.zip
tcl-e0209e39ea32294ee016d240fd1dfe9411469832.tar.gz
tcl-e0209e39ea32294ee016d240fd1dfe9411469832.tar.bz2
Fix test-cases running on Windows 10: [string index $tcl_platform(osVersion) 0] doesn't give the correct answer then (it gives "1", but "10" was expected)
Diffstat (limited to 'tests/cmdAH.test')
-rw-r--r--tests/cmdAH.test2
1 files changed, 1 insertions, 1 deletions
diff --git a/tests/cmdAH.test b/tests/cmdAH.test
index 45a867a..6cc8c0f 100644
--- a/tests/cmdAH.test
+++ b/tests/cmdAH.test
@@ -20,7 +20,7 @@ testConstraint testsetplatform [llength [info commands testsetplatform]]
testConstraint testvolumetype [llength [info commands testvolumetype]]
testConstraint linkDirectory [expr {
![testConstraint win] ||
- ([string index $tcl_platform(osVersion) 0] >= 5
+ ($::tcl_platform(osVersion) >= 5.0
&& [lindex [file system [temporaryDirectory]] 1] eq "NTFS")
}]