Hi Kieren and list,

now I tried to add a feature to ly:grob-interpret-markup - this is working for instrumentName, but not for TextScript.
So one has to look into text-interface.cc ... AFAICS
But before using a property 'font-size-mode (or whatever you name it), would'nt it might be more intuitive, if we could write
\override TextScript #'font-size = 14\pt   ?
I don't know, if this is a good idea ... but if we add an object-property to the number-object (the fontsize), the markup could be tuned accordingly ...

Cheers, Jan-Peter

\version "2.16"

#(let ((inner-grob-interpret-markup grob-interpret-markup))
   (set! grob-interpret-markup
         (lambda (grob mup)
           (let ((font-size-mode (ly:grob-property grob 'font-size-mode))
                 (font-size (ly:grob-property grob 'font-size)))
             
             ; to see, whether this is actually called: #:with-color red
             (set! mup (markup #:with-color red mup))
             
             (if (and (eq? 'absolute font-size-mode)(number? font-size))
                 (inner-grob-interpret-markup grob (markup #:abs-fontsize font-size mup))
                 (inner-grob-interpret-markup grob mup)
                 )
             ))
         ))

\layout {
  \context {
    \Score
    \override InstrumentName #'font-size = #30
    \override InstrumentName #'font-size-mode = #'absolute
    \override TextScript #'font-size = #30
    \override TextScript #'font-size-mode = #'absolute
  }
}

\new Staff \with { instrumentName = "Noise" }
\relative c' { e4^\markup "Test" e e e }
_______________________________________________
lilypond-user mailing list
lilypond-user@gnu.org
https://lists.gnu.org/mailman/listinfo/lilypond-user

Reply via email to