Index: openacs-4/packages/acs-automated-testing/tcl/tclwebtest-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-automated-testing/tcl/tclwebtest-procs.tcl,v diff -u -r1.1.2.1 -r1.1.2.2 --- openacs-4/packages/acs-automated-testing/tcl/tclwebtest-procs.tcl 20 Apr 2004 14:06:53 -0000 1.1.2.1 +++ openacs-4/packages/acs-automated-testing/tcl/tclwebtest-procs.tcl 19 Oct 2005 10:30:44 -0000 1.1.2.2 @@ -74,6 +74,12 @@ } { set ip_address [ns_config ns/server/[ns_info server]/module/nssock Address] + + # If the IP is not configured in the config.tcl we will use the ip of localhost + if {[empty_string_p $ip_address]} { + set ip_address 127.0.0.1 + } + regexp {(:[0-9]*)?$} [util_current_location] match port if { [exists_and_not_null port] } {