--- a/FileSelectionBox.st	Mon Oct 21 12:41:05 1996 +0200
+++ b/FileSelectionBox.st	Tue Oct 22 14:25:00 1996 +0200
@@ -17,7 +17,7 @@
 	category:'Views-DialogBoxes'
 !
 
-!FileSelectionBox  class methodsFor:'documentation'!
+!FileSelectionBox class methodsFor:'documentation'!
 
 copyright
 "
@@ -248,7 +248,7 @@
 "
 ! !
 
-!FileSelectionBox  class methodsFor:'defaults'!
+!FileSelectionBox class methodsFor:'defaults'!
 
 listViewType
     "return the type of listView - using a FileSelectionList here"
@@ -359,6 +359,9 @@
 !
 
 selectingDirectory:aBoolean
+    "setup the box for directory selection (hides regular files).
+     Use this, to ask the user for a directories name"
+
     selectingDirectory := aBoolean.
     aBoolean ifTrue:[
         selectionList directoryChangeAction:[:entry | self directoryChanged].
@@ -366,7 +369,7 @@
         selectionList ignoreFiles:true.
     ]
 
-    "Modified: 18.4.1996 / 18:50:10 / cg"
+    "Modified: 22.10.1996 / 13:24:50 / cg"
 ! !
 
 !FileSelectionBox methodsFor:'change & update'!
@@ -596,8 +599,8 @@
     "Modified: 25.5.1996 / 12:27:08 / cg"
 ! !
 
-!FileSelectionBox  class methodsFor:'documentation'!
+!FileSelectionBox class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/FileSelectionBox.st,v 1.40 1996-10-14 21:29:56 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/FileSelectionBox.st,v 1.41 1996-10-22 12:25:00 cg Exp $'
 ! !