--- a/ToolApplicationModel.st	Thu Feb 04 15:40:40 1999 +0100
+++ b/ToolApplicationModel.st	Thu Feb 11 12:15:28 1999 +0100
@@ -190,7 +190,8 @@
 
     box := AboutBox new.
     box autoHideAfter:10 with:[].
-    box showAtPointer
+    box showAtCenter
+"/    box showAtPointer
 
     "Modified: / 14.8.1998 / 13:03:58 / cg"
     "Created: / 14.8.1998 / 13:17:43 / cg"
@@ -1277,5 +1278,5 @@
 !ToolApplicationModel class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/ToolApplicationModel.st,v 1.78 1999-02-04 14:40:17 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/ToolApplicationModel.st,v 1.79 1999-02-11 11:15:28 cg Exp $'
 ! !