equal
deleted
inserted
replaced
358 self readDirectory |
358 self readDirectory |
359 ] |
359 ] |
360 ifFalse: [self directoryInputField flash] |
360 ifFalse: [self directoryInputField flash] |
361 ]. |
361 ]. |
362 |
362 |
|
363 directoryView selectionOfFile value: |
|
364 (directoryView listOfFiles detect: [:row| row baseName = self valueOfFileName value] ifNone: nil). |
|
365 |
363 ^super postBuildWith:aBuilder |
366 ^super postBuildWith:aBuilder |
364 ! ! |
367 ! ! |
365 |
368 |
366 !FileSelectionBrowser class methodsFor:'documentation'! |
369 !FileSelectionBrowser class methodsFor:'documentation'! |
367 |
370 |