diff options
author | das <das@noemail.net> | 2008-08-14 00:08:23 (GMT) |
---|---|---|
committer | das <das@noemail.net> | 2008-08-14 00:08:23 (GMT) |
commit | a31a50e22e4321dc4fb11cdcb797b053c79f173e (patch) | |
tree | a3beba69cb6ae4e8f1886d8659bab6a6f1409e8c /tests/fCmd.test | |
parent | 24888a39959dae6f487a25901903e4b1ea56900d (diff) | |
download | tcl-a31a50e22e4321dc4fb11cdcb797b053c79f173e.zip tcl-a31a50e22e4321dc4fb11cdcb797b053c79f173e.tar.gz tcl-a31a50e22e4321dc4fb11cdcb797b053c79f173e.tar.bz2 |
* tests/fCmd.test (fCmd-6.23): made result matching robust when test
workdir and /tmp are not on same FS.
FossilOrigin-Name: 59c3f9324628f5a49cf74a77d6424a9d7e0060d2
Diffstat (limited to 'tests/fCmd.test')
-rw-r--r-- | tests/fCmd.test | 4 |
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 { |