--- a/FileBrowserV2.st	Tue May 13 17:21:48 2003 +0200
+++ b/FileBrowserV2.st	Tue May 13 18:12:06 2003 +0200
@@ -441,22 +441,21 @@
      the UIPainter may not be able to read the specification."
 
     "
-     UIPainter new openOnClass:FileBrowserV2 andSelector:#windowSpec
-     FileBrowserV2 new openInterface:#windowSpec
-     FileBrowserV2 open
+     UIPainter new openOnClass:FileBrowserV2 andSelector:#windowSpecNonWindows
+     FileBrowserV2 new openInterface:#windowSpecNonWindows
     "
 
     <resource: #canvas>
 
     ^ 
      #(#FullSpec
-        #name: #windowSpec
+        #name: #windowSpecNonWindows
         #window: 
        #(#WindowSpec
           #label: #FileBrowser
           #name: #FileBrowser
           #min: #(#Point 10 10)
-          #bounds: #(#Rectangle 14 46 814 646)
+          #bounds: #(#Rectangle 16 46 816 646)
           #menu: #mainMenu
           #icon: #applicationIcon
         )
@@ -599,6 +598,7 @@
                           #majorKey: #DirectoryTreeBrowser
                           #createNewApplication: true
                           #createNewBuilder: true
+                          #postBuildCallback: #postBuildDirectoryTree:
                         )
                        #(#SubCanvasSpec
                           #name: 'DirectoryContentsBrowser'
@@ -1681,6 +1681,10 @@
     self previewVisibleHolder addDependent:self.
 !
 
+postBuildDirectoryTree:aWidget
+    aWidget application multipleSelect:true.
+!
+
 postBuildEditField:aWidget
 
     pathEntryField := aWidget.
@@ -1741,7 +1745,7 @@
 !FileBrowserV2 class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/FileBrowserV2.st,v 1.82 2003-04-11 17:35:41 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/FileBrowserV2.st,v 1.83 2003-05-13 16:12:06 cg Exp $'
 ! !
 
 FileBrowserV2 initialize!