diff --git a/mes/module/mes/boot-0.scm b/mes/module/mes/boot-0.scm index fc1e1d11..bca82483 100644 --- a/mes/module/mes/boot-0.scm +++ b/mes/module/mes/boot-0.scm @@ -265,7 +265,7 @@ General help using GNU software: (setenv "GUILE_LOAD_PATH" (string-append dir ":" (getenv "GUILE_LOAD_PATH"))))) (when command (let* ((prev (set-current-input-port (open-input-string command))) - (expr (read-input-file-env (current-module))) + (expr (cons 'begin (read-input-file-env (current-module)))) (set-current-input-port prev)) (primitive-eval expr) (exit 0)))