summaryrefslogtreecommitdiffstats
path: root/library
diff options
context:
space:
mode:
authorhobbs <hobbs>2006-09-16 00:19:41 (GMT)
committerhobbs <hobbs>2006-09-16 00:19:41 (GMT)
commitd7ecf2f735c34c837b464e3fc4af74c48efe1a2a (patch)
tree4341aa48221d56bd965cbb502f2ad12ee038c856 /library
parentc5e2ae09424655cfb0a69b301ee78dcda43b63f4 (diff)
downloadtcl-d7ecf2f735c34c837b464e3fc4af74c48efe1a2a.zip
tcl-d7ecf2f735c34c837b464e3fc4af74c48efe1a2a.tar.gz
tcl-d7ecf2f735c34c837b464e3fc4af74c48efe1a2a.tar.bz2
* library/http/http.tcl: Change " " -> "+" url encoding mapping
* library/http/pkgIndex.tcl: to " " -> "%20" as per RFC 3986. * tests/http.test (http-5.1): bump http to 2.5.3
Diffstat (limited to 'library')
-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 db54d34..1e5818a 100644
--- a/library/http/http.tcl
+++ b/library/http/http.tcl
@@ -8,7 +8,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.57 2006/03/07 19:32:24 dgp Exp $
+# RCS: @(#) $Id: http.tcl,v 1.58 2006/09/16 00:19:41 hobbs Exp $
# Rough version history:
# 1.0 Old http_get interface.
@@ -24,7 +24,7 @@
package require Tcl 8.4
# Keep this in sync with pkgIndex.tcl and with the install directories
# in Makefiles
-package provide http 2.5.2
+package provide http 2.5.3
namespace eval http {
variable http
@@ -50,7 +50,7 @@ namespace eval http {
}
}
# These are handled specially
- array set map { " " + \n %0d%0a }
+ set map(\n) %0d%0a
variable formMap [array get map]
}
init
diff --git a/library/http/pkgIndex.tcl b/library/http/pkgIndex.tcl
index 1691b51..af88a2e 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.4]} {return}
-package ifneeded http 2.5.2 [list tclPkgSetup $dir http 2.5.2 {{http.tcl source {::http::config ::http::formatQuery ::http::geturl ::http::reset ::http::wait ::http::register ::http::unregister}}}]
+package ifneeded http 2.5.3 [list tclPkgSetup $dir http 2.5.3 {{http.tcl source {::http::config ::http::formatQuery ::http::geturl ::http::reset ::http::wait ::http::register ::http::unregister ::http::mapReply}}}]