@@ -3810,11 +3810,11 @@
         )
     )
 
     (if (not (common:on-homehost?))
     (begin
-      (debug:print 0 *default-log-port* "WARNING: You are starting the dashboard on a machine that is not the homehost:" (common:get-homehost))
+      (debug:print 0 *default-log-port* "WARNING: You are starting the dashboard on a machine that is not the homehost:" (server:get-homehost))
       (debug:print 0 *default-log-port* "It will be slower.")
       ))
 
 
     (if (and (common:file-exists? mtdb-path)