# HG changeset patch
# User Stefan Vogel <sv@exept.de>
# Date 1043612692 -3600
# Node ID 8656068aaefb600a2644a313f49663d5f03e4b2c
# Parent  ed4872ed41dfca67b492a56cc86660cafda3a641
*** empty log message ***

diff -r ed4872ed41df -r 8656068aaefb AbstractFileBrowser.st
--- 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 $'
 ! !