diff options
author | hobbs <hobbs> | 2003-11-12 17:29:09 (GMT) |
---|---|---|
committer | hobbs <hobbs> | 2003-11-12 17:29:09 (GMT) |
commit | 8a337db141701521a51b0fbdeed2ec76f4557129 (patch) | |
tree | 43f427c85859f1d72ee7ee002ec08f452377d0be /tests/cmdMZ.test | |
parent | 97930d8cb1af6c7eb851a9ce66f9f16b6a596000 (diff) | |
download | tcl-8a337db141701521a51b0fbdeed2ec76f4557129.zip tcl-8a337db141701521a51b0fbdeed2ec76f4557129.tar.gz tcl-8a337db141701521a51b0fbdeed2ec76f4557129.tar.bz2 |
* tests/cmdMZ.test (cmdMZ-1.4): change to nonPortable as more
systems are using permissions caching, and this isn't really a Tcl
controlled issue.
Diffstat (limited to 'tests/cmdMZ.test')
-rw-r--r-- | tests/cmdMZ.test | 12 |
1 files changed, 5 insertions, 7 deletions
diff --git a/tests/cmdMZ.test b/tests/cmdMZ.test index ac2f72d..8835764 100644 --- a/tests/cmdMZ.test +++ b/tests/cmdMZ.test @@ -11,14 +11,12 @@ # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. # -# RCS: @(#) $Id: cmdMZ.test,v 1.13.2.1 2003/10/06 13:55:37 dgp Exp $ +# RCS: @(#) $Id: cmdMZ.test,v 1.13.2.2 2003/11/12 17:29:10 hobbs Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest 2 namespace import -force ::tcltest::* } -set tcltest::testConstraints(nonLinuxOnly) \ - [expr {![string equal Linux $tcl_platform(os)]}] # Tcl_PwdObjCmd @@ -31,10 +29,10 @@ test cmdMZ-1.2 {Tcl_PwdObjCmd: simple pwd} { test cmdMZ-1.3 {Tcl_PwdObjCmd: simple pwd} { expr [string length pwd]>0 } 1 -test cmdMZ-1.4 {Tcl_PwdObjCmd: failure} {unixOnly nonLinuxOnly} { - # We don't want this test to run on Linux because they do a - # permissions caching trick which causes this to fail. The - # caching is incorrect, but we have no control over that. +test cmdMZ-1.4 {Tcl_PwdObjCmd: failure} {unixOnly nonPortable} { + # This test fails on various unix platforms (eg Linux) where + # permissions caching causes this to fail. The caching is strictly + # incorrect, but we have no control over that. set foodir [file join [temporaryDirectory] foo] file delete -force $foodir file mkdir $foodir |