diff --git a/lilydrum/embellishments.ily b/lilydrum/embellishments.ily index ea94cbe..6f2154d 100644 --- a/lilydrum/embellishments.ily +++ b/lilydrum/embellishments.ily @@ -8,8 +8,8 @@ drumgrace = #(define-music-function (parser location notes ) ( ly:music? ) #{ \once \override Beam.positions = #'(2 . 2) \once \override DrumStaff.Stem.length = #5 \override Flag.stroke-style = #"grace" - \override Score.GraceSpacing #'spacing-increment = #0 - \override Score.Stem #'beamlet-max-length-proportion = #'(0.5 . 0.5) + \override Score.GraceSpacing.spacing-increment = #0 + \override Score.Stem.beamlet-max-length-proportion = #'(0.5 . 0.5) % Print notes % Grace note timing is scaled, so they do not wander off too @@ -18,7 +18,7 @@ drumgrace = #(define-music-function (parser location notes ) ( ly:music? ) #{ \times 1/4 { \grace $notes } % Revert back - \revert Score.Stem #'beamlet-default-length + \revert Score.Stem.beamlet-default-length \revert Flag.stroke-style \stemNeutral #}) diff --git a/lilydrum/rehearsal_marks.ily b/lilydrum/rehearsal_marks.ily index 002decf..3d48301 100644 --- a/lilydrum/rehearsal_marks.ily +++ b/lilydrum/rehearsal_marks.ily @@ -4,20 +4,20 @@ % From Svenax's bagpipemusic markText = #(define-music-function (parser location text) (string?) #{ - \once \override Score.RehearsalMark #'self-alignment-X = #LEFT + \once \override Score.RehearsalMark.self-alignment-X = #LEFT \mark \markup $text #}) markTextEol = #(define-music-function (parser location text) (string?) #{ - \once \override Score.RehearsalMark #'break-visibility = #end-of-line-visible - \once \override Score.RehearsalMark #'self-alignment-X = #RIGHT + \once \override Score.RehearsalMark.break-visibility = #end-of-line-visible + \once \override Score.RehearsalMark.self-alignment-X = #RIGHT \mark \markup $text #}) markTextEolDown = #(define-music-function (parser location text) (string?) #{ - \once \override Score.RehearsalMark #'break-visibility = #end-of-line-visible - \once \override Score.RehearsalMark #'self-alignment-X = #RIGHT - \once \override Score.RehearsalMark #'direction = #DOWN + \once \override Score.RehearsalMark.break-visibility = #end-of-line-visible + \once \override Score.RehearsalMark.self-alignment-X = #RIGHT + \once \override Score.RehearsalMark.direction = #DOWN \mark \markup $text #}) altBracket = #(define-music-function (parser location tag) (string?) #{