checkin from browser
authorClaus Gittinger <cg@exept.de>
Thu, 13 Aug 1998 20:34:18 +0200
changeset 952 c6408190dc6d
parent 951 457d94e33e93
child 953 1aecad8bf33a
checkin from browser
UIPainter.st
--- a/UIPainter.st	Thu Aug 13 20:18:55 1998 +0200
+++ b/UIPainter.st	Thu Aug 13 20:34:18 1998 +0200
@@ -2236,6 +2236,17 @@
     "Modified: / 16.7.1998 / 19:13:30 / cg"
 ! !
 
+!UIPainter methodsFor:'defaults'!
+
+aboutImage
+    "the image to be displayed in my about-box;
+     If nil is returned, thhe ST/X default image is used."
+
+    ^ Image fromFile:'bitmaps/xpmBitmaps/misc_tools/setup_windows.xpm'
+
+    "Created: / 13.8.1998 / 20:33:05 / cg"
+! !
+
 !UIPainter methodsFor:'event handling'!
 
 doesNotUnderstand:aMessage