diff options
-rw-r--r-- | src/image.lisp | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/src/image.lisp b/src/image.lisp index 6f5b1f6..d87a80c 100644 --- a/src/image.lisp +++ b/src/image.lisp @@ -561,10 +561,13 @@ Preprocessing must occur in the root Lisp.")) else collect intern-form)) (proclamations `((proclaim '(special *no-data-sources*)) (proclaim '(special *consfigurator-debug-level*)))) + (initialisations '(setq *no-data-sources* nil + *consfigurator-debug-level* 0)) (forms `((make-package "CONSFIGURATOR") ,@intern-forms ,@proclamations + ,initialisations ;; (define-condition missing-data-source (error) ()) (require "asdf") ;; Hide the compile and/or load output unless there are |