--- a/DirectoryView.st	Sat Jun 20 14:53:47 1998 +0200
+++ b/DirectoryView.st	Sat Jun 20 15:31:39 1998 +0200
@@ -358,12 +358,14 @@
 initialize
 
     super initialize.
+    self createBuilder.
 
     directory :=  directory ? '.' asFilename asAbsoluteFilename directoryName.
     monitoring := false.
     fileAttributes := #('File name' 'Size' 'Modified').
     self selectionOfFileFilter value: (self listOfFileFilters at: 1 ifAbsent: [nil]).
 
+    "Modified: / 20.6.1998 / 14:46:10 / cg"
 ! !
 
 !DirectoryView methodsFor:'private'!

--- a/ShellView.st	Sat Jun 20 14:53:47 1998 +0200
+++ b/ShellView.st	Sat Jun 20 15:31:39 1998 +0200
@@ -332,6 +332,15 @@
 
 ! !
 
+!ShellView methodsFor:'initialization'!
+
+initialize
+    super initialize.
+    self createBuilder
+
+    "Created: / 20.6.1998 / 15:30:48 / cg"
+! !
+
 !ShellView methodsFor:'private'!
 
 append:anElement