squeak stuff
authorClaus Gittinger <cg@exept.de>
Wed, 14 Jul 2004 23:43:29 +0200
changeset 4205 e22cf28fc87a
parent 4204 947a5a5620d3
child 4206 4d3273b10f37
squeak stuff
Font.st
--- a/Font.st	Wed Jul 14 23:42:11 2004 +0200
+++ b/Font.st	Wed Jul 14 23:43:29 2004 +0200
@@ -1069,6 +1069,12 @@
     ^ direction
 !
 
+maxAscii
+    "squeak compatibility"
+
+    ^ self maxCode
+!
+
 maxCode
     device isNil ifTrue:[
         self errorNoDevice
@@ -1079,6 +1085,12 @@
     ^ maxCode
 !
 
+minAscii
+    "squeak compatibility"
+
+    ^ self minCode
+!
+
 minCode 
     device isNil ifTrue:[
         self errorNoDevice
@@ -1152,7 +1164,7 @@
 !Font class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/Font.st,v 1.94 2004-05-07 12:18:59 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/Font.st,v 1.95 2004-07-14 21:43:29 cg Exp $'
 ! !
 
 Font initialize!