duration-length becomes duration-moment, but script no longer works
Richard Shann <[email protected]>
| Newsgroups | gmane.comp.gnu.lilypond.general |
|---|---|
| Message-ID | <[email protected]> |
In running convert.ly from version 2.26.0 on a file that compiles with
2.24.0 I get a change in name from ly:duration-length to ly:duration-
moment. But the typesetting is completely different. The code concerned
is a definition to allow setting the spacing in a graceAfter grace
note. Here is the MWE
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\version "2.26.0"
attachGraces = #(define-music-function (parser location frac note graces) (number? ly:music? ly:music?)
(if (null? (ly:music-property graces 'element))
(begin
(ly:warning "No grace notes follow this note the afterGrace will be ignored.")
(make-music
'SequentialMusic
'elements
(list note graces)))
;(make-music 'Music 'void #t))
(let ((skip (* frac (/ (ly:moment-main-numerator (ly:duration->moment (ly:music-property note 'duration)))
(ly:moment-main-denominator (ly:duration->moment (ly:music-property note 'duration))))))
(thegraces (ly:music-property (list-ref (ly:music-property
(ly:music-property graces 'element) 'elements) 1) 'elements)))
(define gracenotes (make-music 'GraceMusic 'element (make-music
'SequentialMusic
'elements
thegraces)))
(make-music
'SimultaneousMusic
'elements
(list
note
(make-music
'SequentialMusic
'elements
(list
(make-music
'SkipMusic
'duration
(ly:make-duration 0 0 skip))
gracenotes)))))))
\score {
\new Staff
<< { \attachGraces #3/4 g''4 \grace {f''8} } >>
}
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
In addition the internationalization (_ "...") no longer works, so
(ly:warning (_ "No grace notes follow this note the afterGrace will be ignored."))
causes the error message
_: bad use of '_' syntactic keyword in subform (_ "No grace notes follow this note the afterGrace will be ignored.") of (_ "No grace notes follow this note the afterGrace will be ignored.")
Any ideas?
Richard Shann