*** empty log message ***

[lilypond.git] / scm / lily-library.scm

diff --git a/scm/lily-library.scm b/scm/lily-library.scm
index 40b56695bd5d2152034df08a2da12045ea2f6793..77938bd9b4901f601f7b3d03fa8cb8bc3dbe63a0 100644 (file)
--- a/scm/lily-library.scm
+++ b/scm/lily-library.scm
@@ -311,8 +311,7 @@ possibly turned off."
   (cond
    ((equal? (ly:unit) "mm") (/ 72.0 25.4))
    ((equal? (ly:unit) "pt") (/ 72.0 72.27))
-   (else (error "unknown unit" (ly:unit)))))
-
+   (else (ly:error (_ "unknown unit: ~S") (ly:unit)))))
 
 (define-public lily-unit->mm-factor
   (* 25.4 (/ lily-unit->bigpoint-factor 72)))
@@ -341,10 +340,7 @@ possibly turned off."
     scaling))
 
 (define-public (version-not-seen-message)
-  (ly:warn
+  (ly:warning
    (format #f
           (_ "No \\version statement found.  Add~afor future compatibility.")
-          (format #f "\n\n\\version ~s\n\n" (lilypond-version))))
-  (newline (current-error-port)))
-  
-
+          (format #f "\n\n\\version ~s\n\n" (lilypond-version)))))