]> git.donarmstrong.com Git - lilypond.git/blobdiff - scm/ly-from-scheme.scm
* lily/lily-parser.cc (LY_DEFINE): Remove "Now " from message.
[lilypond.git] / scm / ly-from-scheme.scm
index 0b0d25dd53b2d6bc57c7701b394228f0ee74c1ad..f80c161b88b7076a1e031bf4f4bd51d28df3ad7b 100644 (file)
@@ -72,7 +72,7 @@ character."
                             ;; a #scheme expression
                             ((char=? c #\#)
                              (let ((expr (read port)))
-                               (format out "#~a" (if (eq? '$ expr)
+                               (format out "#~s" (if (eq? '$ expr)
                                                      (create-binding! (read port))
                                                      (remove-dollars! expr)))))
                             ;; other caracters