diff options
author | mistachkin <mistachkin@noemail.net> | 2008-06-13 05:45:01 (GMT) |
---|---|---|
committer | mistachkin <mistachkin@noemail.net> | 2008-06-13 05:45:01 (GMT) |
commit | ee337e6d610110e3036beeb2537d68ca99335790 (patch) | |
tree | 32ea63055bc449e3ffe1e3b813bb8c48326ac84c /tests/cmdAH.test | |
parent | 346591d96d2b43f00bf343052aba1a09e67a0468 (diff) | |
download | tcl-ee337e6d610110e3036beeb2537d68ca99335790.zip tcl-ee337e6d610110e3036beeb2537d68ca99335790.tar.gz tcl-ee337e6d610110e3036beeb2537d68ca99335790.tar.bz2 |
TIP 285 Implementation
FossilOrigin-Name: 505c316922f01840b9fed6a409f5ca5786f5ad7d
Diffstat (limited to 'tests/cmdAH.test')
-rw-r--r-- | tests/cmdAH.test | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/tests/cmdAH.test b/tests/cmdAH.test index 79d7b4f..98b09e9 100644 --- a/tests/cmdAH.test +++ b/tests/cmdAH.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: cmdAH.test,v 1.58 2008/04/23 15:44:37 dkf Exp $ +# RCS: @(#) $Id: cmdAH.test,v 1.59 2008/06/13 05:45:14 mistachkin Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest 2.1 @@ -1472,7 +1472,7 @@ test cmdAH-30.8 {Tcl_FileObjCmd: error conditions} { interp create simpleInterp interp create -safe safeInterp -interp c +interp create safeInterp expose file file test cmdAH-31.1 {Tcl_FileObjCmd: channels, too many args} { |