summaryrefslogtreecommitdiffstats
path: root/tests
diff options
context:
space:
mode:
authordas <das>2008-08-14 00:08:23 (GMT)
committerdas <das>2008-08-14 00:08:23 (GMT)
commitc8f2aa86aa2023b82b2329d7412a144dca4c4953 (patch)
treea3beba69cb6ae4e8f1886d8659bab6a6f1409e8c /tests
parent6425f2590d59b5a5c46cb4b50f2152a1118263ed (diff)
downloadtcl-c8f2aa86aa2023b82b2329d7412a144dca4c4953.zip
tcl-c8f2aa86aa2023b82b2329d7412a144dca4c4953.tar.gz
tcl-c8f2aa86aa2023b82b2329d7412a144dca4c4953.tar.bz2
* tests/fCmd.test (fCmd-6.23): made result matching robust when test
workdir and /tmp are not on same FS.
Diffstat (limited to 'tests')
-rw-r--r--tests/fCmd.test4
1 files changed, 2 insertions, 2 deletions
diff --git a/tests/fCmd.test b/tests/fCmd.test
index 64be7de..78c0270 100644
--- a/tests/fCmd.test
+++ b/tests/fCmd.test
@@ -10,7 +10,7 @@
# See the file "license.terms" for information on usage and redistribution of
# this file, and for a DISCLAIMER OF ALL WARRANTIES.
#
-# RCS: @(#) $Id: fCmd.test,v 1.63 2008/07/20 06:40:01 dkf Exp $
+# RCS: @(#) $Id: fCmd.test,v 1.64 2008/08/14 00:08:24 das Exp $
#
if {[lsearch [namespace children] ::tcltest] == -1} {
@@ -602,7 +602,7 @@ test fCmd-6.23 {CopyRenameOneFile: TclpCopyDirectory failed} -setup {
file rename td1 /tmp
} -returnCodes error -cleanup {
file attributes td1 -permissions 0755
-} -result {error renaming "td1": permission denied}
+} -match regexp -result {^error renaming "td1"( to "/tmp/td1")?: permission denied$}
test fCmd-6.24 {CopyRenameOneFile: error uses original name} -setup {
cleanup
} -constraints {unix notRoot} -body {