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 -r1.12 -r1.13
--- openacs-4/packages/acs-tcl/tcl/http-client-procs.tcl	27 Mar 2018 11:18:00 -0000	1.12
+++ openacs-4/packages/acs-tcl/tcl/http-client-procs.tcl	25 Apr 2018 19:23:26 -0000	1.13
@@ -42,7 +42,7 @@
     if {$headers eq ""} {
         set headers [ns_set create headers]
     }
-    set cookies [list]
+    set cookies {}
     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  [list]
-    set https [list]
+    set http  {}
+    set https {}
     if {[util::which curl] ne ""} {
         lappend http  "curl"
         lappend https "curl"
@@ -1009,7 +1009,7 @@
     #
     set this_proc ::util::http::request
 
-    set urlvars [list]
+    set urlvars {}
 
     # ...retrieve redirect location variables...
     set locvars [lindex [split $location ?] 1]