Index: spublish.scm ================================================================== --- spublish.scm +++ spublish.scm @@ -345,13 +345,13 @@ (print (vector-ref x 0)))) versions))) (else (print "Unrecognised command " action))))) ;; ease debugging by loading ~/.dashboardrc - REMOVE FROM PRODUCTION! -(let ((debugcontrolf (conc (get-environment-variable "HOME") "/.spublishrc"))) - (if (file-exists? debugcontrolf) - (load debugcontrolf))) +;; (let ((debugcontrolf (conc (get-environment-variable "HOME") "/.spublishrc"))) +;; (if (file-exists? debugcontrolf) +;; (load debugcontrolf))) (define (main) (let* ((args (argv)) (prog (car args)) (rema (cdr args))