diff options
author | hobbs <hobbs> | 2006-09-15 19:53:32 (GMT) |
---|---|---|
committer | hobbs <hobbs> | 2006-09-15 19:53:32 (GMT) |
commit | 46eeaabac457ed5157a0e04fe91ffb12314230a4 (patch) | |
tree | 60857e3a8c5dbb012c19b85195a12b6075a24e70 /tests | |
parent | 5ff625924793184afe16edd7d667bf2b0daf1012 (diff) | |
download | tcl-46eeaabac457ed5157a0e04fe91ffb12314230a4.zip tcl-46eeaabac457ed5157a0e04fe91ffb12314230a4.tar.gz tcl-46eeaabac457ed5157a0e04fe91ffb12314230a4.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 for 8.4.14
Diffstat (limited to 'tests')
-rw-r--r-- | tests/http.test | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/tests/http.test b/tests/http.test index 773b7b3..1fca0c4 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.33.2.4 2005/11/18 15:20:47 dkf Exp $ +# RCS: @(#) $Id: http.test,v 1.33.2.5 2006/09/15 19:53:33 hobbs Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest 2 @@ -463,7 +463,7 @@ test http-4.15 {http::Event} { test http-5.1 {http::formatQuery} { http::formatQuery name1 value1 name2 "value two" -} {name1=value1&name2=value+two} +} {name1=value1&name2=value%20two} # test http-5.2 obsoleted by 5.4 and 5.5 with http 2.5 test http-5.3 {http::formatQuery} { http::formatQuery lines "line1\nline2\nline3" |