]> git.donarmstrong.com Git - lilypond.git/blob - input/regression/font-family-override.ly
Fix 787
[lilypond.git] / input / regression / font-family-override.ly
1 \header {
2
3   texidoc = "The default font families for text can be
4   overridden with @code{make-pango-font-tree}"
5
6 }
7
8 \version "2.12.0"
9
10 \paper  {
11   % change for other default global staff size. 
12   myStaffSize = #20
13
14
15   %{
16
17   run
18
19       lilypond -dshow-available-fonts blabla
20
21   to show all fonts available in the process log.  
22   
23   %}
24
25   
26   #(define fonts
27     (make-pango-font-tree "Times New Roman"
28                           "Nimbus Sans"
29                           "Luxi Mono"
30
31 ;;     "Helvetica"
32 ;;     "Courier"
33
34      (/ myStaffSize 20)))
35 }
36
37 \relative {
38
39   c'^\markup { roman: foo \bold bla \italic bar \italic \bold baz }
40   c'_\markup {
41     \override #'(font-family . sans)
42     {
43       sans: foo \bold bla \italic bar \italic \bold baz
44     }
45   }
46   c'^\markup {
47     \override #'(font-family . typewriter)
48     {
49       mono: foo \bold bla \italic bar \italic \bold baz
50     }
51   }
52 }