383     self directoryInputField entryCompletionBlock: 

   383     self directoryInputField entryCompletionBlock: 

   384     [:f|

   384     [:f|

   385        |completedDirectory|

   385        |completedDirectory|

   386        (completedDirectory := Filename 

   386        (completedDirectory := Filename 

   387             filenameCompletionFor: self directoryInputField contents

   387             filenameCompletionFor: self directoryInputField contents

   389             directoriesOnly:true 

   389             directoriesOnly:true 

   390             filesOnly:false 

   390             filesOnly:false 

   391             ifMultiple:

   391             ifMultiple:

   392             [:dir | 

   392             [:dir | 

   393                 self directoryTreeView selection notNil ifTrue: [

   393                 self directoryTreeView selection notNil ifTrue: [

   404 

   404 

   405     directoryView selectionOfFile value: 

   405     directoryView selectionOfFile value: 

   406         (directoryView listOfFiles detect: [:row| row baseName = self valueOfFileName value] ifNone: nil).

   406         (directoryView listOfFiles detect: [:row| row baseName = self valueOfFileName value] ifNone: nil).

   407 

   407 

   408     ^super postBuildWith:aBuilder

   408     ^super postBuildWith:aBuilder

   409 ! !

   411 ! !

   410 

   412 

   411 !FileSelectionBrowser class methodsFor:'documentation'!

   413 !FileSelectionBrowser class methodsFor:'documentation'!

   412 

   414 

   413 version

   415 version