Re: Overriding tie-configuration & \shape breaks custom Scheme function since 2.19.24

[Peter Crighton]

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 <address@hidden>:
>
>
> 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
> address@hidden
> https://lists.gnu.org/mailman/listinfo/lilypond-user