# HG changeset patch
# User Claus Gittinger <cg@exept.de>
# Date 944737855 -3600
# Node ID 4703a5b17114f5f5fba173df30e7761fb9cee151
# Parent  c2e73e565cdbd7346eb5dd4a009f0d98ab45b364
*** empty log message ***

diff -r c2e73e565cdb -r 4703a5b17114 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.