Commit 6b7623d910c05495a2f0d7e1f8828d922616bf90

Thomas de Grivel 2018-06-17T17:01:43

fresh-line for msg

1
2
3
4
5
6
7
8
9
10
11
12
diff --git a/msg.lisp b/msg.lisp
index 2215066..9d97570 100644
--- a/msg.lisp
+++ b/msg.lisp
@@ -3,6 +3,7 @@
 
 (defmacro msg (level &rest parts)
   `(progn
+     (fresh-line)
      (write-str *standard-output*
                 ,(symbol-name level)
                 #\Space