Remove *newline* variable

[jscl.git] / src / print.lisp

diff --git a/src/print.lisp b/src/print.lisp
index 17c4693..8cb36bd 100644 (file)
--- a/src/print.lisp
+++ b/src/print.lisp
@@ -283,7 +283,7 @@
                ((char= next #\~)
                 (concatf res "~"))
                ((char= next #\%)
-                (concatf res *newline*))
+                (concatf res (string #\newline)))
                ((char= next #\*)
                 (pop arguments))
                (t