release commit

diff --git a/lily/note-head.cc b/lily/note-head.cc
index b2e451e54c977619553a43198e10fb79cb8e21ca..025207991460f21734ec16b93f55e0aa1dc7be33 100644 (file)
--- a/lily/note-head.cc
+++ b/lily/note-head.cc
@@ -66,6 +66,7 @@ internal_print (Grob *me, String *font_char)
   if (out.is_empty ())
     {
       me->warning (_f ("note head `%s' not found", idx.to_str0 ()));
+      out = Stencil (Box(Interval (0, 0),Interval (0, 0)), SCM_EOL);
     }
   else
     {

diff --git a/ly/music-functions-init.ly b/ly/music-functions-init.ly
index db7b4a031c5d626a805e8860bbdb66024f2b2d95..2d2b9f112d13784f809ee4b04e744b81dcf3088f 100644 (file)
--- a/ly/music-functions-init.ly
+++ b/ly/music-functions-init.ly
@@ -147,7 +147,9 @@ pitchedTrill =
      (if (ly:pitch? trill-pitch)
         (for-each (lambda (m) (ly:music-set-property! m 'trill-pitch trill-pitch))
                   trill-events)
-        (ly:warning (_ "Second argument of \\pitchedTrill should be single note.")))
+        (begin
+          (ly:warning (_ "Second argument of \\pitchedTrill should be single note: "))
+          (display sec-note-events)))
 
      main-note))
 

diff --git a/scm/define-grobs.scm b/scm/define-grobs.scm
index 33e83c8d764720f755f153457c1b57d8ca879771..da3cc4ff85881b3e521bdd2bb332f725780ca5ad 100644 (file)
--- a/scm/define-grobs.scm
+++ b/scm/define-grobs.scm
@@ -40,7 +40,7 @@
        (staff-padding . 0.25)
        (script-priority . 0)
        (meta . ((class . Item)
-                (interfaces . (side-position-interface script-interface
+                (interfaces . (side-position-interface script-interface accidental-interface
                                accidental-suggestion-interface self-alignment-interface
                                font-interface))))
        ))

diff --git a/scm/define-music-types.scm b/scm/define-music-types.scm
index 43e1d74a34c7f30c312b85232b169fbdb4851588..d98cd7b9ad9fcad8c3a7c990fd37f0a6ccc53472 100644 (file)
--- a/scm/define-music-types.scm
+++ b/scm/define-music-types.scm
@@ -125,7 +125,7 @@ Syntax @code{\\translator Staff = @var{new-id}}.")
      . (
        (description .  "A note that is part of a cluster.")
 
-                                       ; not a note-event, to ensure that Note_engraver doesn't eat it. 
+       ;; not a note-event, to ensure that Note_engraver doesn't eat it. 
        (types . (general-music cluster-note-event melodic-event rhythmic-event event))
        ))
     
@@ -346,7 +346,7 @@ SYNTAX
 
 ")
        (types . (general-music layout-instruction))
-       (iterator-ctor . ,      Push_property_iterator::constructor)
+       (iterator-ctor . ,Push_property_iterator::constructor)
        ))
     (PartCombineMusic
      . (
@@ -362,7 +362,7 @@ as separate voices.")
        (description . "Start or end phrasing slur. 
 
 Syntax NOTE \\(  and \\) NOTE")
-       (types . (general-music span-event phrasing-slur-event))
+       (types . (general-music span-event event phrasing-slur-event))
        ))
     
     (PropertySet
@@ -486,7 +486,7 @@ SYNTAX
        (description . "Start or end slur. 
 
 Syntax NOTE(    and )NOTE")
-       (types . (general-music span-event slur-event))
+       (types . (general-music span-event event slur-event))
        ))
     
     (StaffSpanEvent
@@ -504,13 +504,13 @@ Syntax NOTE(       and )NOTE")
     (TextSpanEvent
      . (
        (description . "Start a text spanner like 8va.....|")
-       (types . (general-music span-event text-span-event))
+       (types . (general-music span-event event text-span-event))
        ))
     
     (TrillSpanEvent
      . (
        (description . "Start a trill spanner tr~~~")
-       (types . (general-music span-event trill-span-event))
+       (types . (general-music span-event event trill-span-event))
        ))
     
     (TimeScaledMusic