ShellView.st
changeset 762 ba7c3153f9d1
parent 757 d28fb65967a9
child 782 62f2cd2978d5
--- 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:
         [