(AccidentalPlacement
. (
(direction . ,LEFT)
- (left-padding . 0.2)
(positioning-done . ,ly:accidental-placement::calc-positioning-done)
;; this is quite small, but it is very ugly to have
(MetronomeMark
. (
(after-line-breaking . ,ly:side-position-interface::move-to-extremal-staff)
+ (break-visibility . ,end-of-line-invisible)
(direction . ,UP)
(extra-spacing-width . (+inf.0 . -inf.0))
(outside-staff-priority . 1000)
(side-axis . ,Y)
(stencil . ,ly:text-interface::print)
(Y-offset . ,ly:side-position-interface::y-aligned-side)
+ (X-offset . ,(ly:make-simple-closure
+ `(,+
+ ,(ly:make-simple-closure
+ (list ly:break-alignable-interface::self-align-callback))
+ ,(ly:make-simple-closure
+ (list ly:self-alignment-interface::x-aligned-on-self)))))
+ (self-alignment-X . -1)
+ (break-align-symbol . time-signature)
+ (break-align-symbols . (time-signature))
+ (non-break-align-symbols . (MultiMeasureRest))
(meta . ((class . Item)
(interfaces . (font-interface
metronome-mark-interface
side-position-interface
+ break-alignable-interface
text-interface))))))
(MultiMeasureRest
(break-align-anchor
. ,ly:break-aligned-interface::calc-extent-aligned-anchor)
(break-align-symbol . time-signature)
+ (break-align-anchor-alignment . ,LEFT)
(break-visibility . ,all-visible)
(extra-spacing-height . (-1.0 . 1.0))
(non-musical . #t)
ly:clef::print
ly:percent-repeat-item-interface::beat-slash
ly:text-interface::print
- ly:script-interface::print))
+ ly:script-interface::print
+ ly:sustain-pedal::print))
;; Sometimes we have grobs with (Y-extent . ,ly:grob::stencil-height)
;; and the print function is not pure, but there is a easy way to