Index: megatest.scm ================================================================== --- megatest.scm +++ megatest.scm @@ -309,11 +309,11 @@ (if (and (not (null? remargs)) (not (or (args:get-arg "-runstep")) ;; add more args that use remargs here )) - (debug:print 0 "ERROR: Unrecognised arguments: " (string-intersperse remargs " "))) + (debug:print 0 "ERROR: Unrecognised arguments: " (string-intersperse (if (list? remargs) remargs (argv)) " "))) ;; The watchdog is to keep an eye on things like db sync etc. ;; (define *time-zero* (current-seconds)) (define *watchdog*