*** empty log message ***
authorClaus Gittinger <cg@exept.de>
Fri, 04 Oct 1996 15:43:44 +0200
changeset 1067 4a7925d24a07
parent 1066 bd9f100a928f
child 1068 348a9c6703c2
*** empty log message ***
Font.st
--- a/Font.st	Wed Oct 02 15:27:54 1996 +0200
+++ b/Font.st	Fri Oct 04 15:43:44 1996 +0200
@@ -646,17 +646,17 @@
     |b|
 
     b := [
-            :f_encoding :f_avgAscent :f_avgDescent :f_maxAscent :f_maxDescent
-            :f_minWidth :f_maxWidth :f_avgWidth |
+            :fencoding :favgAscent :favgDescent :fmaxAscent :fmaxDescent
+            :fminWidth :fmaxWidth :favgWidth |
 
-            encoding := f_encoding.
-            ascent := f_avgAscent.
-            descent := f_avgDescent.
-            maxAscent := f_maxAscent.
-            maxDescent := f_maxDescent.
-            minWidth := f_minWidth.
-            maxWidth := f_maxWidth.
-            width := f_avgWidth
+            encoding := fencoding.
+            ascent := favgAscent.
+            descent := favgDescent.
+            maxAscent := fmaxAscent.
+            maxDescent := fmaxDescent.
+            minWidth := fminWidth.
+            maxWidth := fmaxWidth.
+            width := favgWidth
         ].
 
     replacementFont isNil ifTrue:[
@@ -1112,6 +1112,6 @@
 !Font  class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/Font.st,v 1.51 1996-07-24 10:37:24 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/Font.st,v 1.52 1996-10-04 13:43:44 cg Exp $'
 ! !
 Font initialize!