diff options
author | dgp <dgp@noemail.net> | 2002-07-01 02:29:20 (GMT) |
---|---|---|
committer | dgp <dgp@noemail.net> | 2002-07-01 02:29:20 (GMT) |
commit | bc8ac3b1967cd5b2af0fa99ff69af59313ac3805 (patch) | |
tree | 4013ba176f77d97263c96b559735522ac72cf6c3 /tests/cmdAH.test | |
parent | 22d29a32c5741987ebe91adeb78e0a353556aa9c (diff) | |
download | tcl-bc8ac3b1967cd5b2af0fa99ff69af59313ac3805.zip tcl-bc8ac3b1967cd5b2af0fa99ff69af59313ac3805.tar.gz tcl-bc8ac3b1967cd5b2af0fa99ff69af59313ac3805.tar.bz2 |
* Fixed [makeFile] and [viewFile] to accurately reflect a file's
contents. Updated tests that depended on buggy behavior. Also
added warning messages to "-debug 1" operations to debug test
calls to (make|remove)(File|Directory).
FossilOrigin-Name: 49cd7e20344769ecfc0827fba55b2ec1a3fd2db5
Diffstat (limited to 'tests/cmdAH.test')
-rw-r--r-- | tests/cmdAH.test | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/tests/cmdAH.test b/tests/cmdAH.test index cb6b2e4..6d24820 100644 --- a/tests/cmdAH.test +++ b/tests/cmdAH.test @@ -10,10 +10,10 @@ # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. # -# RCS: @(#) $Id: cmdAH.test,v 1.22 2002/06/27 12:27:35 vincentdarley Exp $ +# RCS: @(#) $Id: cmdAH.test,v 1.23 2002/07/01 02:29:22 dgp Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { - package require tcltest + package require tcltest 2.1 namespace import -force ::tcltest::* } @@ -1433,7 +1433,7 @@ test cmdAH-28.4 {Tcl_FileObjCmd: stat} { catch {unset stat} file stat gorp.file stat list $stat(nlink) $stat(size) $stat(type) -} {1 12 file} +} {1 11 file} test cmdAH-28.5 {Tcl_FileObjCmd: stat} {unixOnly} { catch {unset stat} file stat gorp.file stat |