*** empty log message ***

[lilypond.git] / scm / output-svg.scm

diff --git a/scm/output-svg.scm b/scm/output-svg.scm
index 1e5d64b8c75df0721181be1c8781bb288a3ab7de..830bba9ab274e73ed358793d29d7c765c0e8c2d8 100644 (file)
--- a/scm/output-svg.scm
+++ b/scm/output-svg.scm
@@ -38,8 +38,7 @@
       (if (module-defined? this-module keyword)
          (apply (eval keyword this-module) (cdr expr))
          (begin
-           (display
-            (string-append "undefined: " (symbol->string keyword) "\n"))
+           (ly:warning (_ "undefined: ~S") keyword)
            ""))))))
 
 ;; Helper functions
@@ -117,7 +116,7 @@
          (set! size
                (string->number (match:substring match 3))))
 
-       (display (format "Cannot decypher Pango description:  ~a\n" str)))
+       (ly:warning (_ "can't decypher Pango description: ~a") str))
 
     (set! style
          (if (string? style)