]> git.donarmstrong.com Git - lilypond.git/blobdiff - scm/font.scm
Markups: document define-builtin-markup-command
[lilypond.git] / scm / font.scm
index 559bb41ddbee8d73eed49b45247220c52dc24726..30159bd7c1c1f89ca9e8e6c96965e6dbeb082983 100644 (file)
      (fetaBraces ,(ly:pt 20.0)
                 #(,(delay (ly:system-font-load
                            ;;; TODO: rename aybabtu to emmentaler-brace
-                           (string-replace "emmentaler-brace" "aybabtu"
-                                           (string-append name "-brace"))
+                           (if (string=? name "emmentaler")
+                               "aybabtu"
+                               (string-append name "-brace"))
                            )))))))
 
 (define-public (add-pango-fonts node lily-family family factor)