Index: openacs-4/packages/acs-bootstrap-installer/installer/index.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-bootstrap-installer/installer/index.tcl,v
diff -u -r1.19 -r1.20
--- openacs-4/packages/acs-bootstrap-installer/installer/index.tcl	13 Dec 2003 13:19:04 -0000	1.19
+++ openacs-4/packages/acs-bootstrap-installer/installer/index.tcl	24 Dec 2003 23:57:52 -0000	1.20
@@ -265,13 +265,13 @@
 
     # Get the default for system_url. First try to get it from the nssock
     # hostname setting - if that is not available then try ns_info
-    # hostname, use yourdomain.com if that fails too.
     if { [catch {
         set system_url "http://[ns_config "ns/server/[ns_info server]/module/nssock" hostname [ns_info hostname]]"
+        set system_port [ns_config "ns/server/[ns_info server]/module/nssock" port [ns_conn port]]
 
         # append port number if non-standard port
-        if { !([ns_conn port] == 0 || [ns_conn port] == 80) } {
-            append system_url ":[ns_conn port]"
+        if { !($system_port == 0 || $system_port == 80) } {
+            append system_url ":$system_port"
         }
 
     }] } {