--- a/ToolApplicationModel.st	Sat Jun 20 14:31:31 1998 +0200
+++ b/ToolApplicationModel.st	Sat Jun 20 14:51:54 1998 +0200
@@ -1215,6 +1215,15 @@
     [self history size > self class historyMaxSize] whileTrue: [self history removeLast]
 ! !
 
+!ToolApplicationModel methodsFor:'initialization'!
+
+initialize
+    super initialize.
+    self createBuilder
+
+    "Created: / 20.6.1998 / 14:51:29 / cg"
+! !
+
 !ToolApplicationModel methodsFor:'queries'!
 
 allToolInstances
@@ -1414,5 +1423,5 @@
 !ToolApplicationModel class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/ToolApplicationModel.st,v 1.59 1998-06-18 19:42:19 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/ToolApplicationModel.st,v 1.60 1998-06-20 12:51:54 cg Exp $'
 ! !