lilypond-auto
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: [Lilypond-auto] Issue 3057 in lilypond: misbehavior of \deadNotesOn


From: lilypond
Subject: Re: [Lilypond-auto] Issue 3057 in lilypond: misbehavior of \deadNotesOn at the beginning of a voice
Date: Fri, 06 Jun 2014 06:54:05 +0000

Updates:
        Summary: misbehavior of \deadNotesOn at the beginning of a voice

Comment #4 on issue 3057 by address@hidden: misbehavior of \deadNotesOn at the beginning of a voice
http://code.google.com/p/lilypond/issues/detail?id=3057

Greetings,
Even though I (think I) understand what's going on under the hood, the behavior of \xNotesOn (or anything that modifies the note head style and is reverted with \defaultNoteHeads) can seem quite erratic when you combine all of Eluze's examples above:

% Uncommenting this line fixes everything:
% \new Voice
\relative c' {
  % Commenting both of these lines disables \xNotesOn:
  % \clef treble
  % c1 % Just commenting this line disables \xNotesOff
  \xNotesOn
  d e
  \xNotesOff
  f g
}


Now, an easy hack would be to include the <> construct by default in the music-functions involved; it works, but I have no idea whether it could induce some unwanted side-effects:

--- a/scm/music-functions.scm   2014-06-06 08:48:07.762976997 +0200
+++ b/scm/music-functions.scm   2014-06-06 08:49:55.800626340 +0200
@@ -663,20 +663,24 @@

 (define-public (override-head-style heads style)
   "Override style for @var{heads} to @var{style}."
   (make-sequential-music
-   (if (pair? heads)
-       (map (lambda (h)
-              (make-grob-property-override h 'style style))
-            heads)
-       (list (make-grob-property-override heads 'style style)))))
+   (list (make-event-chord '()) ; create an empty anchor point
+    (make-sequential-music
+     (if (pair? heads)
+         (map (lambda (h)
+                (make-grob-property-override h 'style style))
+              heads)
+         (list (make-grob-property-override heads 'style style)))))))

 (define-public (revert-head-style heads)
   "Revert style for @var{heads}."
   (make-sequential-music
-   (if (pair? heads)
-       (map (lambda (h)
-              (make-grob-property-revert h 'style))
-            heads)
-       (list (make-grob-property-revert heads 'style)))))
+   (list (make-event-chord '())
+    (make-sequential-music
+     (if (pair? heads)
+         (map (lambda (h)
+                (make-grob-property-revert h 'style))
+              heads)
+         (list (make-grob-property-revert heads 'style)))))))



--
You received this message because this project is configured to send all issue notifications to this address.
You may adjust your notification preferences at:
https://code.google.com/hosting/settings



reply via email to

[Prev in Thread] Current Thread [Next in Thread]