--- a/DirectoryTreeBrowser.st	Mon Nov 24 21:01:53 2003 +0100
+++ b/DirectoryTreeBrowser.st	Mon Nov 24 21:04:04 2003 +0100
@@ -93,7 +93,7 @@
 
 openOn:aFileName withFiles:aBoolean
 
-    | instance|
+    |instance|
 
     instance := DirectoryTreeBrowser new.
     instance open.
@@ -775,17 +775,16 @@
 !
 
 selectionChanged
-
     |sel currentFileDir|
 
-    " if viewFiles is false i can't take my 
-      selection to overwrite currentFileNameHolder"
-
+    "if viewFiles is false i can't take my 
+     selection to overwrite currentFileNameHolder"
     sel := self selectedFiles.
-    (self viewFilesInDirectoryTree value not) ifTrue:[
-        (self currentFilesAreInSameDirectory and:[sel size == 1 and:[self currentFileNameHolder value notEmpty]]) ifTrue:[
+    self viewFilesInDirectoryTree value ifFalse:[
+        (self currentFilesAreInSameDirectory 
+         and:[sel size == 1 and:[self currentFileNameHolder value notEmpty]]) ifTrue:[
             currentFileDir := self getDirWithoutFileName:(self currentFileNameHolder value first).
-            (sel first = currentFileDir) ifTrue:[
+            sel first = currentFileDir ifTrue:[
                 ^ self.
             ].
         ].
@@ -794,14 +793,12 @@
 !
 
 update:something with:aParameter from:aModel 
-    "one of my models changed
-    "
+    "one of my models changed"
 
 
-    " the execution of selectionChanged and currentFileNameHolderChanged must
-      lock against each other because values dont must be the same (e.g. no files
-      in tree view)
-    "
+    "the execution of selectionChanged and currentFileNameHolderChanged must
+     lock against each other because values mustn't be the same (e.g. no files
+     in tree view)"
 
     aModel == self currentFileNameHolder ifTrue:[
         super update:something with:aParameter from:aModel.
@@ -1305,5 +1302,5 @@
 !DirectoryTreeBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/DirectoryTreeBrowser.st,v 1.79 2003-10-30 13:36:10 penk Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/DirectoryTreeBrowser.st,v 1.80 2003-11-24 20:04:04 stefan Exp $'
 ! !