From 967fc057471fffb32340afe6b7f33e787b31e978 Mon Sep 17 00:00:00 2001 From: hobbs Date: Sat, 20 Nov 1999 17:57:43 +0000 Subject: updated to 2.2 version for http --- tests/http.test | 10 +++++----- 1 file changed, 5 insertions(+), 5 deletions(-) diff --git a/tests/http.test b/tests/http.test index d793727..b4ae601 100644 --- a/tests/http.test +++ b/tests/http.test @@ -12,19 +12,19 @@ # of this file, and for a DISCLAIMER OF ALL WARRANTIES. # # -# RCS: @(#) $Id: http.test,v 1.12 1999/07/20 00:11:53 hershey Exp $ +# RCS: @(#) $Id: http.test,v 1.13 1999/11/20 17:57:43 hobbs Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest namespace import ::tcltest::* } -if {[catch {package require http 2.1}]} { +if {[catch {package require http 2.2}]} { if {[info exist http2]} { - catch {puts "Cannot load http 2.1 package"} + catch {puts "Cannot load http 2.2 package"} return } else { - catch {puts "Running http 2.1 tests in slave interp"} + catch {puts "Running http 2.2 tests in slave interp"} set interp [interp create http2] $interp eval [list set http2 "running"] $interp eval [list source [info script]] @@ -74,7 +74,7 @@ if {[info commands testthread] == "testthread" && [file exists $httpdFile]} { test http-1.1 {http::config} { http::config -} {-accept */* -proxyfilter http::ProxyRequired -proxyhost {} -proxyport {} -useragent {Tcl http client package 2.1}} +} {-accept */* -proxyfilter http::ProxyRequired -proxyhost {} -proxyport {} -useragent {Tcl http client package 2.2}} test http-1.2 {http::config} { http::config -proxyfilter -- cgit v0.12