summaryrefslogtreecommitdiffstats
path: root/tests/fileSystem.test
diff options
context:
space:
mode:
authornijtmans <nijtmans>2010-05-31 09:12:04 (GMT)
committernijtmans <nijtmans>2010-05-31 09:12:04 (GMT)
commit67dc34a79def67d6d61add7f0635c45806fc7a50 (patch)
tree20cfb3394502a1e9f9352e96c0fd715421e2b273 /tests/fileSystem.test
parent3de22ff5a384e6d63befbefeb166e2b60bd419b1 (diff)
downloadtcl-67dc34a79def67d6d61add7f0635c45806fc7a50.zip
tcl-67dc34a79def67d6d61add7f0635c45806fc7a50.tar.gz
tcl-67dc34a79def67d6d61add7f0635c45806fc7a50.tar.bz2
Fix filesystem-5.1 test failure on CYGWIN
Diffstat (limited to 'tests/fileSystem.test')
-rw-r--r--tests/fileSystem.test2
1 files changed, 1 insertions, 1 deletions
diff --git a/tests/fileSystem.test b/tests/fileSystem.test
index 071b63f..2fe13d7 100644
--- a/tests/fileSystem.test
+++ b/tests/fileSystem.test
@@ -546,7 +546,7 @@ test filesystem-5.1 {cache and ~} -constraints testfilesystem -setup {
list $res1 $res2
} -cleanup {
set ::env(HOME) $orig
-} -match regexp -result {{Parent of ~ \(/foo/bar/blah\) is ([a-zA-Z]:)?(/foo/bar|foo:bar)} {Parent of ~ \(/a/b/c\) is ([a-zA-Z]:)?(/a/b|a:b)}}
+} -match regexp -result {{Parent of ~ \(/foo/bar/blah\) is ([a-zA-Z]:)?(/cygwin)?(/foo/bar|foo:bar)} {Parent of ~ \(/a/b/c\) is ([a-zA-Z]:)?(/cygwin)?(/a/b|a:b)}}
test filesystem-6.1 {empty file name} -returnCodes error -body {
open ""