Index: openacs-4/packages/acs-tcl/tcl/http-client-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/http-client-procs.tcl,v diff -u -N -r1.13 -r1.14 --- openacs-4/packages/acs-tcl/tcl/http-client-procs.tcl 25 Apr 2018 19:23:26 -0000 1.13 +++ openacs-4/packages/acs-tcl/tcl/http-client-procs.tcl 9 May 2018 15:33:29 -0000 1.14 @@ -42,7 +42,7 @@ if {$headers eq ""} { set headers [ns_set create headers] } - set cookies {} + set cookies [list] foreach {name value} $resp_headers { # get only set-cookie headers, ignoring case set name [string tolower $name] @@ -258,8 +258,8 @@ } { Obtains implemented apis for http communication } { - set http {} - set https {} + set http [list] + set https [list] if {[util::which curl] ne ""} { lappend http "curl" lappend https "curl" @@ -1009,7 +1009,7 @@ # set this_proc ::util::http::request - set urlvars {} + set urlvars [list] # ...retrieve redirect location variables... set locvars [lindex [split $location ?] 1]