# HG changeset patch
# User Claus Gittinger <cg@exept.de>
# Date 898349499 -7200
# Node ID ab93fcd829c5bf3db6f569ced14f174101721870
# Parent  6221f17ee6e2a5d4747da82e4d04ee2a069ffda6
create builder

diff -r 6221f17ee6e2 -r ab93fcd829c5 DirectoryView.st
--- 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'!
diff -r 6221f17ee6e2 -r ab93fcd829c5 ShellView.st
--- 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