]> git.donarmstrong.com Git - lilypond.git/blobdiff - lily/lily-lexer.cc
*** empty log message ***
[lilypond.git] / lily / lily-lexer.cc
index 1840e54f17e0dbfc07743250bfa58ca43b2ba707..94eae7b7afe4a75afe325a7cf827c0811fa314b7 100644 (file)
@@ -207,7 +207,7 @@ Lily_lexer::set_identifier (SCM name, SCM s)
       if (lookup_keyword (ly_symbol2string (sym)) >= 0)
        {
          String symstr = ly_symbol2string (sym);
-         warning (_f ("Identifier name is a keyword: `%s'", symstr.to_str0 ()));
+         warning (_f ("identifier name is a keyword: `%s'", symstr.to_str0 ()));
        }
 
       SCM mod = scm_car (scopes_);
@@ -215,16 +215,14 @@ Lily_lexer::set_identifier (SCM name, SCM s)
       scm_module_define (mod, sym, s);
     }
   else
-    {
-      programming_error ("Identifier is not a symbol.");
-    }
+    programming_error ("identifier is not a symbol");
 }
 
 void
 Lily_lexer::LexerError (char const *s)
 {
   if (include_stack_.is_empty ())
-    progress_indication (_f ("error at EOF: %s", s) + String ("\n"));
+    message (_f ("error at EOF: %s", s) + "\n");
   else
     {
       error_level_ |= 1;