<?xml version="1.0" encoding="UTF-8"?>
<!DOCTYPE fontconfig SYSTEM "fonts.dtd">
<fontconfig>
+
+ <!-- Define LilyPond default fonts -->
+
+ <alias binding="strong">
+ <family>LilyPond Serif</family>
+ <prefer>
+ <family>Century Schoolbook L</family>
+ <family>DejaVu Serif</family>
+ </prefer>
+ <default>
+ <family>serif</family>
+ </default>
+ </alias>
+
+ <alias binding="strong">
+ <family>LilyPond Sans Serif</family>
+ <prefer>
+ <family>Nimbus Sans L</family>
+ <family>DejaVu Sans</family>
+ </prefer>
+ <default>
+ <family>sans-serif</family>
+ </default>
+ </alias>
+
+ <alias binding="strong">
+ <family>LilyPond Monospace</family>
+ <prefer>
+ <family>Nimbus Mono L</family>
+ <family>DejaVu Sans Mono</family>
+ </prefer>
+ <default>
+ <family>monospace</family>
+ </default>
+ </alias>
+
</fontconfig>
(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)
(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