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.126.2.111 -r1.126.2.112 --- openacs-4/packages/acs-tcl/tcl/security-procs.tcl 5 May 2025 16:37:47 -0000 1.126.2.111 +++ openacs-4/packages/acs-tcl/tcl/security-procs.tcl 25 Sep 2025 17:03:47 -0000 1.126.2.112 @@ -2862,7 +2862,10 @@ # The value of the "DRIVER/servers" section might # contain also a port. # - set d1 [dict merge $d [ns_parsehostport $entry]] + 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]