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.52 -r1.78.2.53
--- openacs-4/packages/acs-tcl/tcl/security-procs.tcl	21 Apr 2017 14:22:45 -0000	1.78.2.52
+++ openacs-4/packages/acs-tcl/tcl/security-procs.tcl	21 Apr 2017 19:11:30 -0000	1.78.2.53
@@ -2024,7 +2024,7 @@
     #
     set driverInfo [util_driver_info]
     set driverHostName [dict get $driverInfo hostname]
-    if {$hostName eq $driverHostName || $hostName in [ns_ -all $driverHostName]} {
+    if {$hostName eq $driverHostName || $hostName in [ns_addrbyhost -all $driverHostName]} {
         #
         # port is currently ignored
         #