# HG changeset patch # User tz # Date 891526192 -7200 # Node ID ba7c3153f9d1bb35128de70242d14eb91eb1439c # Parent 91e5245833906ea0029796a2131aa911464fe98d possibleFileName diff -r 91e524583390 -r ba7c3153f9d1 ShellView.st --- a/ShellView.st Wed Apr 01 16:50:37 1998 +0200 +++ b/ShellView.st Thu Apr 02 16:09:52 1998 +0200 @@ -292,10 +292,10 @@ fileFound := false. [stream atEnd | fileFound] whileFalse: - [ + [ possibleFileName := possibleFileName, stream next. - ((((selectedFileName := possibleFileName) asFilename exists) or: - [(selectedFileName := directory, Filename separator, possibleFileName) asFilename exists]) + (("((selectedFileName := possibleFileName) asFilename exists) or:" + (selectedFileName := directory, Filename separator, possibleFileName) asFilename exists) and: [selectedFileName asFilename isDirectory not]) ifTrue: [