Custom glyph depending on the 'glyph-name

[Pierre Perol-Schneider]

Hi,

I'd like to customize the clefs depending on their glyph-name:

%%
\version "2.19.46"

my-clef-G = \markup "G"

my-clef-F = \markup "F"

\score {
  \new PianoStaff <<
    \new Staff { c' }
    \new Staff { \clef F c' }
  >>
  \layout {
    \context {
      \Score
      \override Clef.stencil =
        #(lambda (grob)
           (let ((glyph (ly:grob-property grob 'glyph-name)))
                 (case glyph
                   (("clefs.G") (grob-interpret-markup grob my-clef-G))
                   (("clefs.F") (grob-interpret-markup grob my-clef-F))
                   (else (ly:clef::print grob)))))
    }
  }
}
%%

But nothing happend.
Any idea?
Thanks in advance,

Cheers,
Pierre

_______________________________________________
lilypond-user mailing list
lilypond-user@gnu.org
https://lists.gnu.org/mailman/listinfo/lilypond-user