--- a/XWorkstation.st	Thu Oct 14 16:11:10 1999 +0200
+++ b/XWorkstation.st	Fri Oct 15 01:40:41 1999 +0200
@@ -6461,10 +6461,10 @@
 
     sizes := super sizesInFamily:aFamilyName face:aFaceName style:aStyleName filtering:filter.
     (sizes notNil and:[sizes includes:0]) ifTrue:[
-	"special: in X11R5 and above, size 0 means:
-	 there are scaled versions in all sizes available"
-
-	^ #(4 5 6 7 8 9 10 11 12 14 16 18 20 22 24 28 32 48 64)
+        "special: in X11R5 and above, size 0 means:
+         there are scaled versions in all sizes available"
+
+        ^ #(4 5 6 7 8 9 10 11 12 14 16 18 20 22 24 28 32 48 64 72 96)
     ].
     ^ sizes
 
@@ -10167,6 +10167,6 @@
 !XWorkstation class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/XWorkstation.st,v 1.329 1999-10-10 12:42:53 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/XWorkstation.st,v 1.330 1999-10-14 23:40:41 cg Exp $'
 ! !
 XWorkstation initialize!