diff options
| author | dgp <dgp@users.sourceforge.net> | 2002-02-05 17:08:03 (GMT) |
|---|---|---|
| committer | dgp <dgp@users.sourceforge.net> | 2002-02-05 17:08:03 (GMT) |
| commit | 98d48e2c815040cf44ab25dfb051af32abd92894 (patch) | |
| tree | 006e83887761c10b0e9e728a7651184e4e961ba3 /library/http/http.tcl | |
| parent | 0b76b754c99e78e1112b519d143d55a3325cef0a (diff) | |
| download | tcl-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/http.tcl')
| -rw-r--r-- | library/http/http.tcl | 6 |
1 files changed, 3 insertions, 3 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 } } |