#REFACTORING by stefan
authorStefan Vogel <sv@exept.de>
Tue, 09 Aug 2016 12:43:08 +0200
changeset 4019 9d2225af7229
parent 4017 42cb3e340b6e
child 4020 24913dc3efdb
child 4021 12a732f6d443
#REFACTORING by stefan class: Text changed: #heightOn: use #deviceFont instead of #createFontOnDevice
Text.st
--- a/Text.st	Mon Aug 08 19:42:37 2016 +0200
+++ b/Text.st	Tue Aug 09 12:43:08 2016 +0200
@@ -1731,7 +1731,7 @@
 heightOn:aGC
     "return the number of device units, required on aGC's device"
 
-    ^ (aGC font onDevice:aGC device) heightOf:string
+    ^ aGC deviceFont heightOf:string
 
     "Created: 12.5.1996 / 11:02:03 / cg"
 !