--- a/AboutBox.st	Thu Mar 24 15:34:13 2011 +0100
+++ b/AboutBox.st	Thu Mar 24 15:34:18 2011 +0100
@@ -13,7 +13,7 @@
 
 InfoBox subclass:#AboutBox
 	instanceVariableNames:''
-	classVariableNames:'CachedIcon DefaultGreen'
+	classVariableNames:'DefaultGreen'
 	poolDictionaries:''
 	category:'Views-DialogBoxes'
 !
@@ -134,24 +134,12 @@
 !
 
 defaultIcon
-    <resource: #programImage>
-
     "return a smalltalk/X icon.
      Can be redefined in custom subclasses."
 
-    CachedIcon isNil ifTrue:[
-        CachedIcon := Icon stxIconTransparent3.
-        CachedIcon isNil ifTrue:[
-            CachedIcon := Smalltalk imageFromFileNamed:'SmalltalkX.xbm' inPackage:'stx:libtool'
-        ]
-    ].
-    ^ CachedIcon
+    <resource: #programImage>
 
-    "   
-     CachedIcon := nil
-    "
-
-    "Modified: / 17-09-2007 / 11:34:56 / cg"
+    ^ Icon stxIconTransparent3.
 !
 
 defaultLabel
@@ -250,9 +238,9 @@
 !AboutBox class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/AboutBox.st,v 1.37 2009-10-14 14:07:02 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/AboutBox.st,v 1.38 2011-03-24 14:34:18 stefan Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/AboutBox.st,v 1.37 2009-10-14 14:07:02 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/AboutBox.st,v 1.38 2011-03-24 14:34:18 stefan Exp $'
 ! !