--- a/FileDialog.st	Mon Jan 07 14:54:57 2008 +0100
+++ b/FileDialog.st	Thu Jan 10 11:42:38 2008 +0100
@@ -730,7 +730,7 @@
                   )
                  (SubCanvasSpec
                     name: 'DirectoryTreeBrowser'
-                    layout: (LayoutFrame 0 0.0 57 0 0 1.0 -30 1)
+                    layout: (LayoutFrame 0 0.0 62 0 0 1.0 -30 1)
                     tabable: true
                     hasHorizontalScrollBar: false
                     hasVerticalScrollBar: false
@@ -740,10 +740,10 @@
                     postBuildCallback: postBuildTreeBrowser:
                   )
                  (VariableHorizontalPanelSpec
-                    name: 'VariableHorizontalPanel1'
-                    layout: (LayoutFrame 0 0 32 0 0 1 57 0)
+                    name: 'DeviceAndFilterPanel'
+                    layout: (LayoutFrame 0 0 32 0 0 1 62 0)
                     level: 1
-                    showHandle: false
+                    showHandle: true
                     component: 
                    (SpecCollection
                       collection: (
@@ -754,7 +754,7 @@
                             collection: (
                              (ComboListSpec
                                 name: 'ComboList1'
-                                layout: (LayoutFrame 1 0 1 0.0 121 0 -1 1)
+                                layout: (LayoutFrame 1 0 1 0.0 -1 1 -1 1)
                                 visibilityChannel: driveSelectorVisible
                                 model: selectedDeviceDrive
                                 comboList: listOfDeviceDrives
@@ -773,13 +773,13 @@
                              (LabelSpec
                                 label: 'Filter:'
                                 name: 'FilterLabel'
-                                layout: (LayoutFrame 8 0 2 0 59 0 -2 1)
+                                layout: (LayoutFrame 1 0 2 0 59 0 -2 1)
                                 translateLabel: true
                                 adjust: right
                               )
                              (InputFieldSpec
                                 name: 'FilterEntryField'
-                                layout: (LayoutFrame 60 0 -22 1 -2 1 -2 1)
+                                layout: (LayoutFrame 60 0 -27 1 -2 1 -2 1)
                                 model: filterHolder
                                 immediateAccept: true
                                 acceptOnReturn: true
@@ -795,19 +795,19 @@
                        )
                      
                     )
-                    handles: (Any 0.5 1.0)
+                    handles: (Any 0.18427518427518 1.0)
                   )
                  (LabelSpec
                     label: 'Filename:'
                     name: 'FilenameLabel'
-                    layout: (LayoutFrame 3 0 -21 1 73 0 -1 1)
+                    layout: (LayoutFrame 3 0 -25 1 73 0 -1 1)
                     translateLabel: true
                     labelChannel: filenameLabelHolder
                     adjust: left
                   )
                  (FilenameInputFieldSpec
                     name: 'FilenameEntryField'
-                    layout: (LayoutFrame 70 0 -21 1 -4 1 -1 1)
+                    layout: (LayoutFrame 70 0 -25 1 -4 1 -1 1)
                     tabable: true
                     model: filenameHolder
                     immediateAccept: false
@@ -1652,5 +1652,5 @@
 !FileDialog class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/FileDialog.st,v 1.93 2007-01-12 17:40:43 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/FileDialog.st,v 1.94 2008-01-10 10:42:38 fm Exp $'
 ! !