--- 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:
[