X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=scm%2Ffont.scm;h=cad14c9ec531cfd9b90a34712b3f4f45698a5087;hb=07756d4f02ceaa6df8e0667bc3313bde61e76abf;hp=0582a492a1e18dec33db1c2533e3133b3f16740f;hpb=af1b0da3853670ee559e148cea70535d5f6ac716;p=lilypond.git diff --git a/scm/font.scm b/scm/font.scm index 0582a492a1..cad14c9ec5 100644 --- a/scm/font.scm +++ b/scm/font.scm @@ -249,12 +249,17 @@ used. This is used to select the proper design size for the text fonts. ; "emmentaler", "sans-serif", and "monospace", respectively. All fonts are ; still accesible through the usual scheme symbols: 'feta, 'roman, 'sans, and ; 'typewriter. +; +; Note that 'LilyPond Serif', 'LilyPond Sans Serif' and 'Lilypond Monospace' +; are aliases that are defined in mf/lilypond-fonts.conf.in (source file) +; or fonts/lilypond-fonts.conf (installed file). + (define*-public (set-global-fonts #:key (music "emmentaler") (brace "emmentaler") - (roman "Century Schoolbook L") - (sans "Nimbus Sans L") - (typewriter "Nimbus Mono L") + (roman "LilyPond Serif") + (sans "LilyPond Sans Serif") + (typewriter "LilyPond Monospace") (factor 1)) (let ((n (make-font-tree-node 'font-encoding 'fetaMusic))) (add-music-fonts n 'feta music brace feta-design-size-mapping factor) @@ -273,9 +278,9 @@ used. This is used to select the proper design size for the text fonts. (define-public (make-century-schoolbook-tree factor) (make-pango-font-tree - "Century Schoolbook L" - "Nimbus Sans L" - "Nimbus Mono L" + "LilyPond Serif" + "LilyPond Sans Serif" + "LilyPond Monospace" factor)) (define-public all-text-font-encodings