changed: #fontDescriptionFromLogicalFontInfoArray:
authorClaus Gittinger <cg@exept.de>
Tue, 09 Nov 2010 13:00:28 +0100
changeset 5649 50c68e749917
parent 5648 b89cd3568cbf
child 5650 657ac8149dc3
changed: #fontDescriptionFromLogicalFontInfoArray:
WinWorkstation.st
--- a/WinWorkstation.st	Tue Nov 09 12:59:47 2010 +0100
+++ b/WinWorkstation.st	Tue Nov 09 13:00:28 2010 +0100
@@ -12663,14 +12663,13 @@
 !
 
 fontDescriptionFromLogicalFontInfoArray:anInfoArray
-    |fntDescr family face style logicalSize pointSize encoding outQuality|
+    |fntDescr family face style logicalSize pointSize encoding|
 
     family := anInfoArray at:16.
     face   := anInfoArray at:6.
     style  := anInfoArray at:15.
     logicalSize   := anInfoArray at:1.
     encoding := anInfoArray at:17.
-    outQuality := anInfoArray at:13.
 
     logicalSize := logicalSize abs.
     "/ convert from device to point size
@@ -12686,7 +12685,7 @@
     fntDescr setPixelSize:logicalSize.
     ^ fntDescr.
 
-    "Modified: / 09-11-2010 / 12:59:11 / cg"
+    "Modified: / 09-11-2010 / 13:00:18 / cg"
 !
 
 fontMetricsOf:fontId
@@ -18933,11 +18932,11 @@
 !WinWorkstation class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/WinWorkstation.st,v 1.445 2010-11-09 11:59:47 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/WinWorkstation.st,v 1.446 2010-11-09 12:00:28 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libview/WinWorkstation.st,v 1.445 2010-11-09 11:59:47 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/WinWorkstation.st,v 1.446 2010-11-09 12:00:28 cg Exp $'
 ! !
 
 WinWorkstation initialize!