diff --git a/scripts/new-post b/scripts/new-post
index 1ad9e98..1e88c3b 100755
--- a/scripts/new-post
+++ b/scripts/new-post
@@ -25,7 +25,7 @@
         (pretty-write `((date (,(date-year now) ,(date-month now) ,(date-day now)))
                         (title ,name)
                         (is-meow #t)))
-        (write-string (format "\n# ~a\n\nHello world\n" name)))))
+        (printf "\n# ~a\n\nHello world\n" name))))
   (void))
 
 (command-line