summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorstanton <stanton>1999-05-06 18:45:41 (GMT)
committerstanton <stanton>1999-05-06 18:45:41 (GMT)
commit790b81e6f748b60c1d89b7741a5ce2888d1ecc0b (patch)
treeafc96213c4a0016af6503558612a5bdde859bd17
parente87fc48c3d08b0973fd342dedfaa528261775909 (diff)
downloadtcl-790b81e6f748b60c1d89b7741a5ce2888d1ecc0b.zip
tcl-790b81e6f748b60c1d89b7741a5ce2888d1ecc0b.tar.gz
tcl-790b81e6f748b60c1d89b7741a5ce2888d1ecc0b.tar.bz2
* tests/http.test: Unset "data" array before running tests to
avoid failures due to previous tests.
-rw-r--r--tests/http.test3
1 files changed, 2 insertions, 1 deletions
diff --git a/tests/http.test b/tests/http.test
index 099b962..f5ab77f 100644
--- a/tests/http.test
+++ b/tests/http.test
@@ -12,7 +12,7 @@
# of this file, and for a DISCLAIMER OF ALL WARRANTIES.
#
#
-# RCS: @(#) $Id: http.test,v 1.5 1999/04/24 01:46:53 stanton Exp $
+# RCS: @(#) $Id: http.test,v 1.6 1999/05/06 18:45:41 stanton Exp $
if {[lsearch [namespace children] ::tcltest] == -1} {
source [file join [pwd] [file dirname [info script]] defs.tcl]
@@ -35,6 +35,7 @@ if {[catch {package require http 2.0}]} {
set port 8010
set bindata "This is binary data\x0d\x0amore\x0dmore\x0amore\x00null"
+catch {unset data}
# Ensure httpd file exists