diff options
| author | dgp <dgp@users.sourceforge.net> | 2002-07-01 02:29:21 (GMT) |
|---|---|---|
| committer | dgp <dgp@users.sourceforge.net> | 2002-07-01 02:29:21 (GMT) |
| commit | f211b4e55ee58981446b46e61f4702f72debe32a (patch) | |
| tree | 4013ba176f77d97263c96b559735522ac72cf6c3 /tests/cmdAH.test | |
| parent | 3778d78fa0369f91e4b2b4f0e502745be8eecb65 (diff) | |
| download | tcl-f211b4e55ee58981446b46e61f4702f72debe32a.zip tcl-f211b4e55ee58981446b46e61f4702f72debe32a.tar.gz tcl-f211b4e55ee58981446b46e61f4702f72debe32a.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).
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 |