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.129 -r1.130 --- openacs-4/packages/acs-tcl/tcl/security-procs.tcl 26 Nov 2024 08:18:55 -0000 1.129 +++ openacs-4/packages/acs-tcl/tcl/security-procs.tcl 13 Dec 2024 09:53:39 -0000 1.130 @@ -3066,7 +3066,13 @@ # $hostName and checks the properties of the first IP address # returned. # - set validationOk [expr {![ns_ip public [ns_addrbyhost $host]]}] + try { + ns_addrbyhost $host + } on ok {result} { + set validationOk [expr {![ns_ip public $result]}] + } on error {errorMsg} { + ad_log warning "provided value in host header field '$host' could not be resolved" + } } return 0