@@ -61,11 +61,11 @@ (if res res (hostname->ip hostname)))) "."))) (define (http-transport:run hostn) (debug:print 2 "Attempting to start the server ...") (if (not *toppath*) - (if (not (setup-for-run)) + (if (not (launch:setup-for-run)) (begin (debug:print 0 "ERROR: cannot find megatest.config, cannot start server, exiting") (exit)))) (let* (;; (iface (if (string=? "-" hostn) ;; #f ;; (get-host-name) @@ -352,11 +352,11 @@ (exit))))))) ;; all routes though here end in exit ... (define (http-transport:launch) (if (not *toppath*) - (if (not (setup-for-run)) + (if (not (launch:setup-for-run)) (begin (debug:print 0 "ERROR: cannot find megatest.config, exiting") (exit)))) (debug:print-info 2 "Starting the standalone server") (if (args:get-arg "-daemonize")