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.137 -r1.138 --- openacs-4/packages/acs-tcl/tcl/security-procs.tcl 24 Sep 2025 15:23:40 -0000 1.137 +++ openacs-4/packages/acs-tcl/tcl/security-procs.tcl 25 Sep 2025 11:28:38 -0000 1.138 @@ -2882,8 +2882,11 @@ # The value of the "DRIVER/servers" section might # contain also a port. # - #ns_log notice "get proto from <[ns_parsehostport $entry]> or <$d>" - set d1 [dict merge $d [ns_parsehostport $entry]] + #ns_log notice "get proto from or <$d>" + set d1 [dict merge $d [ns_parsehostport \ + [expr {[string match *:* $entry] + ? "\[$entry\]" + : $entry}]]] set proto [dict get $d proto] set host [dict get $d1 host] set port [dict get $d1 port]