--- a/DirectoryTreeBrowser.st	Thu Mar 04 10:34:10 2004 +0100
+++ b/DirectoryTreeBrowser.st	Thu Mar 04 10:34:25 2004 +0100
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
 "
  COPYRIGHT (c) 2002 by eXept Software AG
               All Rights Reserved
@@ -736,16 +738,16 @@
 
 currentFileNameHolderChanged
 
-    | selectFiles viewFiles|
+    | filesToSelect viewFiles|
 
     viewFiles:= self viewFilesInDirectoryTree value.
     viewFiles ifTrue:[
-        selectFiles := self currentFileNameHolder value.
+        filesToSelect := self currentFileNameHolder value.
     ] ifFalse:[
-        selectFiles := self currentDirectories value.
+        filesToSelect := self currentDirectories value.
     ].
     self rootHolder notNil ifTrue:[
-        self selectFiles:selectFiles.
+        self selectFiles:filesToSelect.
 
         "/ cg: why was this done
 "/false ifTrue:[
@@ -755,7 +757,6 @@
 "/            ]
 "/        ].
 "/].
-        ^ self
     ].
 !
 
@@ -1306,5 +1307,5 @@
 !DirectoryTreeBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/DirectoryTreeBrowser.st,v 1.84 2004-01-20 11:18:35 penk Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/DirectoryTreeBrowser.st,v 1.85 2004-03-04 09:34:25 cg Exp $'
 ! !