Fine, here it goes:
tacet =
#(define-music-function
(str)
(string?)
#{
\compressFullBarRests
\once\override MultiMeasureRest.expand-limit = #1
\once\override MultiMeasureRestNumber.font-name = "Vera Bold"
\once\override MultiMeasureRestNumber.stencil =
#(lambda (grob)(grob-interpret-markup grob
(markup #:whiteout #:pad-markup .8 str)))
\once\override MultiMeasureRest.layer = #-2
\once\override MultiMeasureRestNumber.layer = #-1
\once\override MultiMeasureRestNumber.Y-offset = #-.5
#})
2015-10-09 10:03 GMT+02:00 David Kastrup <d...@gnu.org>:
> Pierre Perol-Schneider <pierre.schneider.pa...@gmail.com> writes:
>
> > Hi Andrew,
> >
> > How about:
> >
> > \version "2.19.28"
> >
> > tacet =
> > #(define-scheme-function (parser location str) (string?)
> > #{
> > \compressFullBarRests
>
> You mean define-music-function here, and in version 2.19.28 the
> "parser location" arguments are just unnecessary baggage.
>
> --
> David Kastrup
>
_______________________________________________
lilypond-user mailing list
lilypond-user@gnu.org
https://lists.gnu.org/mailman/listinfo/lilypond-user
