-trillflat =
- \once \override TrillSpanner #'(bound-details left text) =
- #(markup #:translate-scaled '(-0.05 . -1)
- #:concat (#:musicglyph "scripts.trill"
- #:translate '(-0.5 . 1.9) #:fontsize -7 #:flat))
-
+trillFlat =
+\once \override TrillSpanner #'(bound-details left text) = \markup {
+ \concat {
+ \musicglyph #"scripts.trill"
+ \translate #'(-0.5 . 1.9)
+ \fontsize #-7
+ \with-dimensions #'(0 . 0) #'(0 . 0)
+ \flat
+ }
+}