diff --git a/guile/mu/script.scm b/guile/mu/script.scm
index 1f1e3478..0f64a05e 100644
--- a/guile/mu/script.scm
+++ b/guile/mu/script.scm
@@ -22,8 +22,10 @@
 
 (define (help-and-exit)
   "Show some help."
-  (format #t "usage: script [--help] [--textonly] "
-    "[--muhome=<muhome>] [--query=<query>\n")
+  (display
+    (string-append "usage: script [--help] [--textonly] "
+      "[--muhome=<muhome>] [--query=<query>")
+    (newline))
   (exit 0))
 
 (define (mu:run-stats args func)