release: 1.3.101

[lilypond.git] / scm / font.scm

diff --git a/scm/font.scm b/scm/font.scm
index 2a7d64910b5798861f14dd8e1ab6eef4de816878..fc59fcdfad72a6e39de5320c70c62a01d46f366f 100644 (file)
--- a/scm/font.scm
+++ b/scm/font.scm
@@ -67,6 +67,8 @@
     ((-3 medium upright roman cmr 6) . "cmr6" )
     ((-4 medium upright roman cmr 5) . "cmr5" )
     ((-5 medium upright roman cmr 4) . "cmr4" )
+    ((-3 medium italic roman cmti 5) . "cmti6")    
+    ((-2 medium italic roman cmti 6) . "cmti7")
     ((-1 medium italic roman cmti 8) . "cmti8")    
     ((0 medium italic roman cmti 10) . "cmti10")
     ((1 medium italic roman cmti 12) . "cmti12")
@@ -94,13 +96,14 @@
     ((-3 bold italic dynamic feta 10) . "feta-din6")
     ((-4 bold italic dynamic feta 10) . "feta-din5")
     ((-5 bold italic dynamic feta 10) . "feta-din4")
+    ((2 medium upright music feta 26) . "feta26")
+    ((1 medium upright music feta 23) . "feta23")
     ((0 medium upright music feta 20) . "feta20")
+    ((-0.5 medium upright music feta 20) . "feta19")    
     ((-1 medium upright music feta 16) . "feta16")
     ((-2 medium upright music feta 13) . "feta13")
     ((-3 medium upright music feta 13) . "feta11")
     ((-4 medium upright music feta 13) . "feta11")
-    ((1 medium upright music feta 23) . "feta23")
-    ((2 medium upright music feta 26) . "feta26")
     ((-1 medium upright math msam 10) . "msam10")
     ((-2 medium upright math msam 10) . "msam10")
     ((-3 medium upright math msam 10) . "msam10")
@@ -135,9 +138,10 @@
 (define font-list-alist
   (map-alist-vals (lambda (x) (change-style-sheet-relative-size
                               paper20-style-sheet-alist x))
-                 '((paper11 . -3)
-                   (paper13 . -2)
-                   (paper16 . -1)
+                 '((paper11 . -4)
+                   (paper13 . -3)
+                   (paper16 . -2)
+                   (paper19 . -1)                  
                    (paper20 . 0)
                    (paper23 . 1)
                    (paper26 . 2)