--- a/FileSelectionBox.st	Wed May 03 18:30:51 1995 +0200
+++ b/FileSelectionBox.st	Sat May 06 16:18:13 1995 +0200
@@ -21,7 +21,7 @@
 COPYRIGHT (c) 1990 by Claus Gittinger
 	      All Rights Reserved
 
-$Header: /cvs/stx/stx/libwidg/FileSelectionBox.st,v 1.15 1995-05-03 16:29:13 claus Exp $
+$Header: /cvs/stx/stx/libwidg/FileSelectionBox.st,v 1.16 1995-05-06 14:17:07 claus Exp $
 '!
 
 !FileSelectionBox class methodsFor:'documentation'!
@@ -42,7 +42,7 @@
 
 version
 "
-$Header: /cvs/stx/stx/libwidg/FileSelectionBox.st,v 1.15 1995-05-03 16:29:13 claus Exp $
+$Header: /cvs/stx/stx/libwidg/FileSelectionBox.st,v 1.16 1995-05-06 14:17:07 claus Exp $
 "
 !
 
@@ -195,16 +195,14 @@
 !
 
 createEnterField
-    "
-     if the (optional) class FilenameEditField is present, use
+    "if the (optional) class FilenameEditField is present, use
      it, since it provides filename completion. Otherwise, we have
-     to live with the dump field ...
+     to live with the dump (default) field ...
     "
     FilenameEditField notNil ifTrue:[
-	enterField := FilenameEditField in:self.
-    ] ifFalse:[
-	super createEnterField
-    ]
+	^ FilenameEditField new.
+    ].
+    ^ super createEnterField
 !
 
 focusSequence