summaryrefslogtreecommitdiff
path: root/module/scripts/compile.scm
diff options
context:
space:
mode:
Diffstat (limited to 'module/scripts/compile.scm')
-rw-r--r--module/scripts/compile.scm11
1 files changed, 6 insertions, 5 deletions
diff --git a/module/scripts/compile.scm b/module/scripts/compile.scm
index 9763d1d6e..f9d6cca99 100644
--- a/module/scripts/compile.scm
+++ b/module/scripts/compile.scm
@@ -168,11 +168,12 @@ Report bugs to <~A>.~%"
(for-each (lambda (file)
(format #t "wrote `~A'\n"
- (compile-file file
- #:output-file output-file
- #:from from
- #:to to
- #:opts compile-opts)))
+ (with-fluids ((*current-warning-prefix* ""))
+ (compile-file file
+ #:output-file output-file
+ #:from from
+ #:to to
+ #:opts compile-opts))))
input-files)))
(define main compile)