updates for newest lilypond versions
This commit is contained in:
parent
152d56fe3f
commit
3cb0e00e8f
@ -37,7 +37,7 @@ TEXT = \markuplist {
|
||||
\context {
|
||||
\Score
|
||||
% Tempo des midi files
|
||||
tempoWholesPerMinute = #(ly:make-moment midiQuarterNoteSpeed 4)
|
||||
tempoWholesPerMinute = #(/ midiQuarterNoteSpeed 4)
|
||||
}
|
||||
}
|
||||
}#})
|
||||
|
@ -59,7 +59,7 @@ swingMusic =
|
||||
(partial-duration-length (car es))
|
||||
(if (ly:music? e)
|
||||
(if (and (eq? name 'ContextSpeccedMusic) (eq? (ly:music-property e 'name) 'PartialSet))
|
||||
(ly:duration-length (ly:music-property e 'duration))
|
||||
(ly:duration->moment (ly:music-property e 'duration))
|
||||
(if (eq? name 'NoteEvent)
|
||||
ZERO-MOMENT
|
||||
(partial-duration-length e)
|
||||
|
Loading…
x
Reference in New Issue
Block a user