# HG changeset patch
# User Claus Gittinger <cg@exept.de>
# Date 1256241050 -7200
# Node ID 9c8ce64879924f27fcadcda55fc870393ff87fff
# Parent  e7356633519a7154f148c92a71c2a1b56a301036
changed: #aboutImage

diff -r e7356633519a -r 9c8ce6487992 ToolApplicationModel.st
--- a/ToolApplicationModel.st	Thu Oct 22 21:09:13 2009 +0200
+++ b/ToolApplicationModel.st	Thu Oct 22 21:50:50 2009 +0200
@@ -1158,7 +1158,7 @@
     "the image to be displayed in my about-box;
      If nil is returned, thhe ST/X default image is used."
 
-    ^ nil
+    ^ self class defaultIcon
 
     "Created: / 25.7.1998 / 20:33:50 / cg"
 ! !
@@ -1639,5 +1639,9 @@
 !ToolApplicationModel class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/ToolApplicationModel.st,v 1.135 2008-12-19 23:02:57 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/ToolApplicationModel.st,v 1.136 2009-10-22 19:50:50 cg Exp $'
+!
+
+version_CVS
+    ^ '$Header: /cvs/stx/stx/libview2/ToolApplicationModel.st,v 1.136 2009-10-22 19:50:50 cg Exp $'
 ! !