--- a/TextView.st	Wed Dec 01 21:31:04 1999 +0100
+++ b/TextView.st	Wed Dec 01 21:35:07 1999 +0100
@@ -180,10 +180,7 @@
     i := self classResources at:'ICON' default:nil.
     i isNil ifTrue:[
         nm := ClassResources at:'ICON_FILE' default:'Editor.xbm'.
-        i := Image fromFile:nm resolution:100.
-        i isNil ifTrue:[
-            i := Image fromFile:('bitmaps/' , nm) resolution:100.
-        ]
+        i := Smalltalk bitmapFromFileNamed:nm forClass:self.
     ].
     i notNil ifTrue:[
         i := i onDevice:Display
@@ -2980,5 +2977,5 @@
 !TextView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/TextView.st,v 1.145 1999-11-26 14:39:53 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/TextView.st,v 1.146 1999-12-01 20:35:07 cg Exp $'
 ! !