author | Claus Gittinger <cg@exept.de> |
Thu, 09 Dec 1999 12:10:55 +0100 | |
changeset 1273 | 4703a5b17114 |
parent 1272 | c2e73e565cdb |
child 1274 | 216c45682d15 |
UIPainter.st | file | annotate | diff | comparison | revisions |
--- 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.