write-string . format -> printf

2020-05-14 16:45:54 -04:00 · 2020-05-14 16:45:54 -04:00 · 14fc346705
parent 007d37341e
commit 14fc346705
1 changed files with 1 additions and 1 deletions
--- 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