* input/regression/music-head.ly (texidoc): new file.

[lilypond.git] / lily / lexer.ll

diff --git a/lily/lexer.ll b/lily/lexer.ll
index fa31de9c419a0d062a89d1f1c08b7738bb69bac6..506c047dbf0fcd20eee693c89a1c74afb57e5b43 100644 (file)
--- a/lily/lexer.ll
+++ b/lily/lexer.ll
@@ -891,7 +891,7 @@ lookup_markup_command (String s)
 int
 music_head_type (SCM func)
 {
-       SCM type= scm_object_property (func, ly_symbol2scm ("music-head-signature"));
+       SCM type= scm_object_property (func, ly_symbol2scm ("music-head-signature-keyword"));
        if (type == ly_symbol2scm ("scm"))
        {
                return MUSIC_HEAD_SCM;