--- a/AbstractFileBrowser.st	Sun Jan 26 15:22:40 2003 +0100
+++ b/AbstractFileBrowser.st	Sun Jan 26 21:24:52 2003 +0100
@@ -4934,7 +4934,7 @@
     selFiles := self currentDirectories value.
     selFiles isEmpty ifTrue:[^ nil].
     selFiles size == 1 ifTrue:[^ selFiles first].
-    stringCol := (selFiles collect:[: file| file asString]) asOrderedCollection.
+    stringCol := (selFiles collect:[:file| file asString]) asOrderedCollection.
     firstPre := stringCol at:1.
     stringCol from:2 do:[:el|
          firstPre :=  firstPre commonPrefixWith:el.
@@ -5551,5 +5551,5 @@
 !AbstractFileBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/AbstractFileBrowser.st,v 1.82 2003-01-20 10:39:39 penk Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/AbstractFileBrowser.st,v 1.83 2003-01-26 20:24:52 stefan Exp $'
 ! !