--- a/AboutBox.st	Thu Nov 23 02:00:26 1995 +0100
+++ b/AboutBox.st	Thu Nov 23 03:24:18 1995 +0100
@@ -10,8 +10,6 @@
  hereby transferred.
 "
 
-'From Smalltalk/X, Version:2.10.5 on 22-mar-1995 at 6:53:38 am'!
-
 InfoBox subclass:#AboutBox
 	 instanceVariableNames:''
 	 classVariableNames:'CachedIcon'
@@ -21,8 +19,18 @@
 
 !AboutBox class methodsFor:'documentation'!
 
-version
-    ^ '$Header: /cvs/stx/stx/libtool/AboutBox.st,v 1.11 1995-11-21 09:14:45 cg Exp $'
+copyright
+"
+ COPYRIGHT (c) 1995 by Claus Gittinger
+	      All Rights Reserved
+
+ This software is furnished under a license and may be used
+ only in accordance with the terms of that license and with the
+ inclusion of the above copyright notice.   This software may not
+ be provided or otherwise made available to, or used by, any
+ other person.  No title to or ownership of the software is
+ hereby transferred.
+"
 !
 
 documentation
@@ -38,31 +46,12 @@
 "
 !
 
-copyright
-"
- COPYRIGHT (c) 1995 by Claus Gittinger
-	      All Rights Reserved
-
- This software is furnished under a license and may be used
- only in accordance with the terms of that license and with the
- inclusion of the above copyright notice.   This software may not
- be provided or otherwise made available to, or used by, any
- other person.  No title to or ownership of the software is
- hereby transferred.
-"
+version
+    ^ '$Header: /cvs/stx/stx/libtool/AboutBox.st,v 1.12 1995-11-23 02:24:18 cg Exp $'
 ! !
 
 !AboutBox class methodsFor:'defaults'!
 
-defaultIcon
-    "return a smalltalk/X icon"
-
-    CachedIcon isNil ifTrue:[
-	CachedIcon := Form fromFile:'SmalltalkX.xbm' resolution:100.
-    ].
-    ^ CachedIcon
-!
-
 aboutText
     "return a string to be shown in the box"
 
@@ -87,6 +76,15 @@
 ' , distributor.
 
     "Modified: 16.11.1995 / 18:34:16 / cg"
+!
+
+defaultIcon
+    "return a smalltalk/X icon"
+
+    CachedIcon isNil ifTrue:[
+	CachedIcon := Form fromFile:'SmalltalkX.xbm' resolution:100.
+    ].
+    ^ CachedIcon
 ! !
 
 !AboutBox methodsFor:'initialization'!