@@ -74,11 +74,11 @@
 	 (hostname        (get-host-name))
 	 (ipaddrstr       (let ((ipstr (if (string=? "-" hostn)
 					   ;; (string-intersperse (map number->string (u8vector->list (hostname->ip hostname))) ".")
 					   (server:get-best-guess-address hostname)
 					   #f)))
-			    (if ipstr ipstr hostn))) ;; hostname)))
+			    (if ipstr ipstr hostn))) ;; hostname))) 
 	 (start-port    (if (and (args:get-arg "-port")
 				 (string->number (args:get-arg "-port")))
 			    (string->number (args:get-arg "-port"))
 			    (if (and (config-lookup  *configdat* "server" "port")
 				     (string->number (config-lookup  *configdat* "server" "port")))