Adds glissando-skip property to the rhythmic-head-interface.

This allows glissandi to skip over one or several rhythmic head(s)
in the same Voice as its endpoints.

diff --git a/input/regression/glissando-skip.ly b/input/regression/glissando-skip.ly
new file mode 100644 (file)
index 0000000..9b3febb
--- /dev/null
+++ b/input/regression/glissando-skip.ly
@@ -0,0 +1,12 @@
+\version "2.15.12"
+
+\header {
+  texidoc = "@code{NoteColumn} grobs can be skipped over by glissandi.
+"
+}
+
+\relative c' {
+  a2 \glissando
+  \once \override NoteColumn #'glissando-skip = ##t
+  f''4 d,
+}

diff --git a/lily/glissando-engraver.cc b/lily/glissando-engraver.cc
index 164b12a9f14f1523fc48bda2ba37cdc5cb370848..bb57bf1fcdccc5405842500eb10d478694b1bf61 100644 (file)
--- a/lily/glissando-engraver.cc
+++ b/lily/glissando-engraver.cc
@@ -78,6 +78,9 @@ void
 Glissando_engraver::acknowledge_note_column (Grob_info info)
 {
   Grob *g = info.grob ();
+  if (to_boolean (g->get_property ("glissando-skip")))
+    return;
+
   if (stop_glissandi_)
     {
       extract_grob_set (g, "note-heads", note_heads);

diff --git a/lily/rhythmic-head.cc b/lily/rhythmic-head.cc
index 77993275ff4c6a045af09b6af9b98d73d8b24ed8..24029e3ada42334e83eaf5439c5a765dd0aefd8b 100644 (file)
--- a/lily/rhythmic-head.cc
+++ b/lily/rhythmic-head.cc
@@ -65,5 +65,6 @@ ADD_INTERFACE (Rhythmic_head,
                /* properties */
                "dot "
                "duration-log "
+               "glissando-skip "
                "stem "
               );

diff --git a/scm/define-grob-properties.scm b/scm/define-grob-properties.scm
index 58a085800f6ed7a2597ff61c44077eb839d2d1f9..34363155f5a7bd7dbd0f9e4cdffe58ba5d0fa90b 100644 (file)
--- a/scm/define-grob-properties.scm
+++ b/scm/define-grob-properties.scm
@@ -406,6 +406,8 @@ read from the NonMusicalPaperColumn that begins the measure.")
 ;;
      (gap ,ly:dimension? "Size of a gap in a variable symbol.")
      (gap-count ,integer? "Number of gapped beams for tremolo.")
+     (glissando-skip ,boolean? "Should this @code{NoteHead} be skipped
+by glissandi?")
      (glyph ,string? "A string determining what @q{style} of glyph is
 typeset.  Valid choices depend on the function that is reading this
 property.")