--- a/Font.st	Tue Oct 22 17:57:38 1996 +0200
+++ b/Font.st	Tue Oct 22 19:55:59 1996 +0200
@@ -18,7 +18,7 @@
 	category:'Graphics-Support'
 !
 
-!Font  class methodsFor:'documentation'!
+!Font class methodsFor:'documentation'!
 
 copyright
 "
@@ -189,7 +189,7 @@
 "
 ! !
 
-!Font  class methodsFor:'initialization'!
+!Font class methodsFor:'initialization'!
 
 flushDeviceFontsFor:aDevice
     "unassign all fonts from their device if they are assigned
@@ -248,7 +248,7 @@
     "Created: 15.6.1996 / 15:21:30 / cg"
 ! !
 
-!Font  class methodsFor:'instance creation'!
+!Font class methodsFor:'instance creation'!
 
 family:familyString face:faceString style:styleString size:sizeNum encoding:encodingSym
     "returns a font for given family, face, style, size and encoding. 
@@ -1043,7 +1043,7 @@
 
     (textOrString isString) ifTrue:[
         isFixedWidth ifFalse:[
-            ^ device widthOf:textOrString inFont:fontId
+            ^ device widthOf:textOrString string inFont:fontId
         ].
         ^ width * textOrString size
     ].
@@ -1071,7 +1071,7 @@
     ].
     ^ max * width
 
-    "Modified: 22.2.1996 / 21:53:52 / cg"
+    "Modified: 22.10.1996 / 17:11:14 / cg"
 !
 
 widthOf:aString from:start to:stop
@@ -1109,9 +1109,9 @@
     ^ self height
 ! !
 
-!Font  class methodsFor:'documentation'!
+!Font class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/Font.st,v 1.52 1996-10-04 13:43:44 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/Font.st,v 1.53 1996-10-22 17:55:59 cg Exp $'
 ! !
 Font initialize!