diff options
| author | hershey <hershey@noemail.net> | 1998-12-29 19:34:49 (GMT) |
|---|---|---|
| committer | hershey <hershey@noemail.net> | 1998-12-29 19:34:49 (GMT) |
| commit | 07f48bfdbfe71f882a401477379d0d78fa9bece4 (patch) | |
| tree | 3fe15755bb477d7ddd9f0e48683b1b227c10f197 /tests/main.test | |
| parent | 9c39753532405a7cb8366e11412f1b85c176756c (diff) | |
| download | tk-07f48bfdbfe71f882a401477379d0d78fa9bece4.zip tk-07f48bfdbfe71f882a401477379d0d78fa9bece4.tar.gz tk-07f48bfdbfe71f882a401477379d0d78fa9bece4.tar.bz2 | |
now removes "script" file created by test.scriptics-tclpro-1-2-a1
FossilOrigin-Name: 606bd06d17117c5ba0b27d12f38553a928f72ef0
Diffstat (limited to 'tests/main.test')
| -rw-r--r-- | tests/main.test | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/tests/main.test b/tests/main.test index e7ed056..778ce03 100644 --- a/tests/main.test +++ b/tests/main.test @@ -9,7 +9,7 @@ # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. # -# RCS: @(#) $Id: main.test,v 1.2 1998/09/14 18:23:48 stanton Exp $ +# RCS: @(#) $Id: main.test,v 1.3 1998/12/29 19:34:50 hershey Exp $ if {[info procs test] != "test"} { source defs @@ -27,5 +27,6 @@ test main-1.1 {StdinProc} {unixOnly} { } else { set error 0 } + file delete -force script list $error $msg } {0 {}} |