--- scm/font.scm.orig	Wed Jan 17 23:47:22 2001
+++ scm/font.scm	Wed Jan 24 10:48:07 2001
@@ -65,41 +65,41 @@
     ((-4 medium upright number feta-nummer 5) . "feta-nummer5")
     ((-5 medium upright number feta-nummer 4) . "feta-nummer4")
 
-    ((4 medium upright roman cmr 20) . "cmr20")
-    ((3 medium upright roman cmr 16) . "cmr16")
-    ((2 medium upright roman cmr 14) . "cmr14")
+    ((4 medium upright roman cmr 17) . "cmr17")
+    ((3 medium upright roman cmr 17) . "cmr17")
+    ((2 medium upright roman cmr 12) . "cmr12")
     ((1 medium upright roman cmr 12) . "cmr12")
     ((0 medium upright roman cmr 10) . "cmr10")
     ((-1 medium upright roman cmr 8) . "cmr8" )
     ((-2 medium upright roman cmr 7) . "cmr7" )
     ((-3 medium upright roman cmr 6) . "cmr6" )
     ((-4 medium upright roman cmr 5) . "cmr5" )
-    ((-5 medium upright roman cmr 4) . "cmr4" )
+    ((-5 medium upright roman cmr 5) . "cmr5" )
 
-    ((3 medium italic roman cmti 16) . "cmti16")
-    ((2 medium italic roman cmti 14) . "cmti14")
+    ((3 medium italic roman cmti 12) . "cmti12")
+    ((2 medium italic roman cmti 12) . "cmti12")
     ((1 medium italic roman cmti 12) . "cmti12")
     ((0 medium italic roman cmti 10) . "cmti10")
     ((-1 medium italic roman cmti 8) . "cmti8")    
     ((-2 medium italic roman cmti 7) . "cmti7")
-    ((-3 medium italic roman cmti 6) . "cmti6")    
+    ((-3 medium italic roman cmti 7) . "cmti7")    
 
-    ((2 bold upright roman cmbx 14) . "cmbx14")
+    ((2 bold upright roman cmbx 12) . "cmbx12")
     ((1 bold upright roman cmbx 12) . "cmbx12")
     ((0 bold upright roman cmbx 10) . "cmbx10")
     ((-1 bold upright roman cmbx 8) . "cmbx8")
     ((-2 bold upright roman cmbx 7) . "cmbx7")
     
-    ((4 medium upright typewriter cmtt 20) . "cmtt20")
-    ((3 medium upright typewriter cmtt 16) . "cmtt16")
-    ((2 medium upright typewriter cmtt 14) . "cmtt14")
+    ((4 medium upright typewriter cmtt 17) . "cmtt17")
+    ((3 medium upright typewriter cmtt 17) . "cmtt17")
+    ((2 medium upright typewriter cmtt 12) . "cmtt12")
     ((1 medium upright typewriter cmtt 12) . "cmtt12")
     ((0 medium upright typewriter cmtt 10) . "cmtt10")
     ((-1 medium upright typewriter cmtt 8) . "cmtt8" )
     ((-2 medium upright typewriter cmtt 7) . "cmtt7" )
     ((-3 medium upright typewriter cmtt 6) . "cmtt6" )
     ((-4 medium upright typewriter cmtt 5) . "cmtt5" )
-    ((-5 medium upright typewriter cmtt 4) . "cmtt4" )
+    ((-5 medium upright typewriter cmtt 5) . "cmtt5" )
 
     ;; should use the same brace font every where and fix C++ code.
     ((2 * * braces feta-braces 26) . "feta-braces26")