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

[Malte Meyn]

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
        }
      >>
    }
  >>
>>