diff options
Diffstat (limited to 'ly/bagpipe.ly')
| -rw-r--r-- | ly/bagpipe.ly | 18 |
1 files changed, 9 insertions, 9 deletions
diff --git a/ly/bagpipe.ly b/ly/bagpipe.ly index 99eeffb881..ea252970aa 100644 --- a/ly/bagpipe.ly +++ b/ly/bagpipe.ly @@ -38,14 +38,14 @@ pitchnames = \pitchnamesBagpipe hideKeySignature = { % We normally don't want to show the key signature. - \override Staff.KeySignature #'stencil = ##f + \override Staff.KeySignature.stencil = ##f \set Staff.extraNatural = ##f \key d \major \accidentalStyle forget } showKeySignature = { % Show the key signature e.g. for BMW compatibility. - \override Staff.KeySignature #'stencil = #ly:key-signature-interface::print + \override Staff.KeySignature.stencil = #ly:key-signature-interface::print \set Staff.extraNatural = ##f \key d \major \accidentalStyle forget @@ -57,10 +57,10 @@ showKeySignature = { \context { \Voice % All stems go down. - \override Stem #'direction = #DOWN + \override Stem.direction = #DOWN % All slurs and ties are on top. - \override Slur #'direction = #UP - \override Tie #'direction = #UP + \override Slur.direction = #UP + \override Tie.direction = #UP } } @@ -89,13 +89,13 @@ marchTime = { % Add appropriate tweaks needed for piping grace notes to look great. stemspace = #(define-music-function (parser location extent) (pair?) #{ - \once \override Staff.Stem #'X-extent = #extent + \once \override Staff.Stem.X-extent = #extent #}) pgrace = #(define-music-function (parser location notes) (ly:music?) #{ - \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) \small \grace $notes \normalsize - \revert Score.Stem #'beamlet-default-length + \revert Score.Stem.beamlet-default-length #}) % Single grace notes |