summaryrefslogtreecommitdiffstats
path: root/library/http
diff options
context:
space:
mode:
authordgp <dgp@users.sourceforge.net>2002-02-05 17:08:03 (GMT)
committerdgp <dgp@users.sourceforge.net>2002-02-05 17:08:03 (GMT)
commit98d48e2c815040cf44ab25dfb051af32abd92894 (patch)
tree006e83887761c10b0e9e728a7651184e4e961ba3 /library/http
parent0b76b754c99e78e1112b519d143d55a3325cef0a (diff)
downloadtcl-98d48e2c815040cf44ab25dfb051af32abd92894.zip
tcl-98d48e2c815040cf44ab25dfb051af32abd92894.tar.gz
tcl-98d48e2c815040cf44ab25dfb051af32abd92894.tar.bz2
* Corrected use of http::error when
::error was intended. Bump to http 2.4.2.
Diffstat (limited to 'library/http')
-rw-r--r--library/http/http.tcl6
-rw-r--r--library/http/pkgIndex.tcl2
2 files changed, 4 insertions, 4 deletions
diff --git a/library/http/http.tcl b/library/http/http.tcl
index 838ae1b..3cc0640 100644
--- a/library/http/http.tcl
+++ b/library/http/http.tcl
@@ -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: http.tcl,v 1.40 2002/01/25 03:07:16 hobbs Exp $
+# RCS: @(#) $Id: http.tcl,v 1.41 2002/02/05 17:08:04 dgp Exp $
# Rough version history:
# 1.0 Old http_get interface
@@ -24,7 +24,7 @@
package require Tcl 8.2
# keep this in sync with pkgIndex.tcl
-package provide http 2.4.1
+package provide http 2.4.2
namespace eval http {
variable http
@@ -198,7 +198,7 @@ proc http::reset { token {why reset} } {
if {[info exists state(error)]} {
set errorlist $state(error)
unset state
- eval error $errorlist
+ eval ::error $errorlist
}
}
diff --git a/library/http/pkgIndex.tcl b/library/http/pkgIndex.tcl
index bfca5a9..8461a67 100644
--- a/library/http/pkgIndex.tcl
+++ b/library/http/pkgIndex.tcl
@@ -9,4 +9,4 @@
# full path name of this file's directory.
if {![package vsatisfies [package provide Tcl] 8.2]} {return}
-package ifneeded http 2.4.1 [list tclPkgSetup $dir http 2.4.1 {{http.tcl source {::http::config ::http::formatQuery ::http::geturl ::http::reset ::http::wait ::http::register ::http::unregister}}}]
+package ifneeded http 2.4.2 [list tclPkgSetup $dir http 2.4.2 {{http.tcl source {::http::config ::http::formatQuery ::http::geturl ::http::reset ::http::wait ::http::register ::http::unregister}}}]