diff options
-rw-r--r-- | tools/magrathea/mg.scm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/tools/magrathea/mg.scm b/tools/magrathea/mg.scm index e5b0cb07d4de..86fed6fc2490 100644 --- a/tools/magrathea/mg.scm +++ b/tools/magrathea/mg.scm @@ -214,7 +214,7 @@ USAGE (define (execute-build t) (let ((expr (nix-expr-for t))) - (printf "[mg] building target ~A~%" t) + (fprintf (current-error-port) "[mg] building target ~A~%" t) (process-execute "nix-build" (list "-E" expr "--show-trace")))) (define (build args) @@ -232,7 +232,7 @@ USAGE (define (execute-shell t) (let ((expr (nix-expr-for t)) (user-shell (or (get-environment-variable "SHELL") "bash"))) - (printf "[mg] entering shell for ~A~%" t) + (fprintf (current-error-port) "[mg] entering shell for ~A~%" t) (process-execute "nix-shell" (list "-E" expr "--command" user-shell)))) |