Index: openacs-4/packages/acs-tcl/tcl/security-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/security-procs.tcl,v
diff -u -r1.78.2.56 -r1.78.2.57
--- openacs-4/packages/acs-tcl/tcl/security-procs.tcl	23 May 2017 20:51:41 -0000	1.78.2.56
+++ openacs-4/packages/acs-tcl/tcl/security-procs.tcl	26 May 2017 08:20:47 -0000	1.78.2.57
@@ -1981,8 +1981,10 @@
             }
         } else {
             foreach hostname $host_node_map_hosts_list {
-                if {[dict get $d proto] eq "http"} {
-                    lappend locations "http://${hostname}[dict get $d suffix]"
+                foreach d $driver_info {
+                    if {[dict get $d proto] eq "http"} {
+                        lappend locations "http://${hostname}[dict get $d suffix]"
+                    }
                 }
                 if {$secure_conn_p} {
                     foreach d $driver_info {