*** empty log message ***
authorClaus Gittinger <cg@exept.de>
Thu, 09 Dec 1999 12:10:55 +0100
changeset 1273 4703a5b17114
parent 1272 c2e73e565cdb
child 1274 216c45682d15
*** empty log message ***
UIPainter.st
--- a/UIPainter.st	Sat Dec 04 16:06:12 1999 +0100
+++ b/UIPainter.st	Thu Dec 09 12:10:55 1999 +0100
@@ -2870,7 +2870,7 @@
     selectionPanel openWindow.
     selectionPanel masterApplication:self.
 
-    icon := Smalltalk bitmapFromFileNamed:'UIPainter.xbm' forClass:self class.
+    icon := Smalltalk imageFromFileNamed:'UIPainter.xbm' forClass:self class.
     topView iconLabel:'GUI Painter'.
     topView icon:icon.