diff --git a/cli/zilch-rust.scm b/cli/zilch-rust.scm index 8f1d939..e8c1b66 100644 --- a/cli/zilch-rust.scm +++ b/cli/zilch-rust.scm @@ -57,7 +57,7 @@ executables in the crate, if unspecified) ; Set up the logger. (define (set-print-logs val) #f) (let ((prev-error-handler (current-exception-handler))) (current-exception-handler (lambda data (set-print-logs #t) (apply prev-error-handler data)))) -(when (not (assoc 'debug options)) (terminal-port? (current-error-port)) +(when (terminal-port? (current-error-port)) (let-values (((new-out new-err statusbar-set-print-logs logger) (statusbar-logger (current-output-port) (current-error-port) (assoc 'print-build-logs options)))) (current-output-port new-out) (current-error-port new-err)