--- a/DirectoryTreeBrowser.st	Tue Apr 08 18:28:42 2003 +0200
+++ b/DirectoryTreeBrowser.st	Tue Apr 08 18:30:00 2003 +0200
@@ -1,20 +1,20 @@
 "{ Package: 'stx:libtool' }"
 
 AbstractDirectoryBrowser subclass:#DirectoryTreeBrowser
-	instanceVariableNames:'oldDropItem expandItemTimedBlock updateTreeSelection
-		doubleClickAction newVisibilityHolder allowFileOperations
-		multipleSelect treeSelectionHolder sortInTreeVisibilityHolder
-		sortPropertyInTree sortCaselessInTreeBrowser'
-	classVariableNames:''
-	poolDictionaries:''
-	category:'Interface-Tools-File'
+        instanceVariableNames:'oldDropItem expandItemTimedBlock updateTreeSelection
+                doubleClickAction newVisibilityHolder allowFileOperations
+                multipleSelect treeSelectionHolder sortInTreeVisibilityHolder
+                sortPropertyInTree sortCaselessInTreeBrowser'
+        classVariableNames:''
+        poolDictionaries:''
+        category:'Interface-Tools-File'
 !
 
 HierarchicalFileList subclass:#DirTreeBrowserHFL
-	instanceVariableNames:'draggedItem grayDirectoryIcon'
-	classVariableNames:''
-	poolDictionaries:''
-	privateIn:DirectoryTreeBrowser
+        instanceVariableNames:'draggedItem grayDirectoryIcon'
+        classVariableNames:''
+        poolDictionaries:''
+        privateIn:DirectoryTreeBrowser
 !
 
 !DirectoryTreeBrowser class methodsFor:'documentation'!
@@ -614,11 +614,7 @@
 !
 
 multipleSelect
-
-    multipleSelect isNil ifTrue:[
-        multipleSelect := true.
-    ].
-    ^ multipleSelect
+    ^ multipleSelect ? false
 !
 
 multipleSelect:aBoolean
@@ -1114,7 +1110,7 @@
 
     selection := self treeSelectionHolder value.
     selection isNil ifTrue:[ ^ #() ].
-    multipleSelect ifTrue:[^ selection ].
+    self multipleSelect ifTrue:[^ selection ].
     ^ Array with:selection. "Wrap single value into Array"
 ! !
 
@@ -1192,11 +1188,6 @@
     browser multipleSelectOk:self multipleSelect.
 !
 
-postBuildWith:aBuilder
-
-    super postBuildWith:aBuilder.
-!
-
 postOpen
 
     self rootHolderChanged.
@@ -1247,5 +1238,5 @@
 !DirectoryTreeBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/DirectoryTreeBrowser.st,v 1.61 2003-04-08 13:38:56 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/DirectoryTreeBrowser.st,v 1.62 2003-04-08 16:30:00 cg Exp $'
 ! !