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 -N -r1.78.2.49 -r1.78.2.50
--- openacs-4/packages/acs-tcl/tcl/security-procs.tcl	26 Mar 2017 15:22:32 -0000	1.78.2.49
+++ openacs-4/packages/acs-tcl/tcl/security-procs.tcl	15 Apr 2017 09:16:10 -0000	1.78.2.50
@@ -1742,7 +1742,9 @@
     ad_proc -private security::configured_driver_info {} {
         
         Return a list of dicts containing type, driver, location and port
-        of the configured drivers
+        of all configured drivers
+
+        @see util_driver_info
         
     } {
         set defaultport {http 80 https 433}
@@ -2017,9 +2019,12 @@
 
     #
     # Check, if the provided host is the same as the configued host
-    # name. Should be true in most cases.
+    # name for the current driver or one of its IP addresses. Should
+    # be true in most cases.
     #
-    if {$hostName eq [ns_info hostname] || $hostName eq [ns_info addr]} {
+    set driverInfo [util_driver_info]
+    set driverHostName [dict get $driverInfo hostname]
+    if {$hostName eq $driverHostName || $hostName in [ns_addrbyhost -all $driverHostName]} {
         #
         # port is currently ignored
         #