Thank you, works perfectly!
--
Peter Crighton | Musician & Music Engraver based in Mainz, Germany
http://www.petercrighton.de
2016-01-10 9:44 GMT+01:00 Malte Meyn <lilyp...@maltemeyn.de>:
>
>
> Am 10.01.2016 um 02:50 schrieb Peter Crighton:
>> (if (or (music-is-of-type? mus 'rest-event)
>> (music-is-of-type? mus 'multi-measure-rest))
>
> The overrides fall into the ‘else’ case and then the tweaks are applied.
> I’m not sure why this is changing all of the following note heads (bug?)
> but I have a solution for your problem: Just tweak only if there is a
> rhythmic-event.
>
> \version "2.19.35"
>
> bgr =
> #(define-music-function (music) (ly:music?)
> (music-map
> (lambda (mus)
> (cond
> ((or (music-is-of-type? mus 'rest-event)
> (music-is-of-type? mus 'multi-measure-rest))
> (make-music 'SkipEvent mus))
> ((music-is-of-type? mus 'rhythmic-event)
> #{
> \tweak NoteHead.font-size #-2
> \tweak Accidental.font-size #-2
> #mus
> #})
> (else
> mus)))
> music))
>
> \new Staff <<
> \new Voice <<
> \relative c' {
> <<
> {
> c4 d e f~
> f g a b
> }
>
> \bgr {
> g a b c~
> \once \override TieColumn.tie-configuration = #'((0 . 1) (0 . -1))
> c d e f
> }
> >>
> }
> >>
>>>
>
> _______________________________________________
> lilypond-user mailing list
> lilypond-user@gnu.org
> https://lists.gnu.org/mailman/listinfo/lilypond-user
_______________________________________________
lilypond-user mailing list
lilypond-user@gnu.org
https://lists.gnu.org/mailman/listinfo/lilypond-user
