FileSelectionBrowser.st
changeset 607 8b6cd53f93b8
parent 605 62efcf9d43a4
child 615 47f5ba2850d1
--- a/FileSelectionBrowser.st	Fri Feb 06 00:38:12 1998 +0100
+++ b/FileSelectionBrowser.st	Fri Feb 06 03:43:42 1998 +0100
@@ -132,11 +132,11 @@
           #'window:' 
            #(#WindowSpec
               #'name:' 'File Selection Browser'
-              #'layout:' #(#LayoutFrame 106 0 175 0 605 0 524 0)
+              #'layout:' #(#LayoutFrame 230 0 472 0 897 0 821 0)
               #'label:' 'File Selection Browser'
               #'min:' #(#Point 10 10)
               #'max:' #(#Point 1152 900)
-              #'bounds:' #(#Rectangle 106 175 606 525)
+              #'bounds:' #(#Rectangle 230 472 898 822)
               #'usePreferredExtent:' false
           )
           #'component:' 
@@ -171,7 +171,7 @@
                                     )
                                      #(#InputFieldSpec
                                         #'name:' 'directoryInputField'
-                                        #'layout:' #(#LayoutFrame 0 0.0 -22 1 0 1.0 0 1)
+                                        #'layout:' #(#LayoutFrame 2 0.0 -22 1 0 1.0 0 1)
                                         #'model:' #selectionOfDirectory
                                         #'immediateAccept:' false
                                     )
@@ -186,7 +186,7 @@
                                    #(
                                      #(#InputFieldSpec
                                         #'name:' 'EditField'
-                                        #'layout:' #(#LayoutFrame 1 0.0 -22 1 0 1.0 0 1)
+                                        #'layout:' #(#LayoutFrame 1 0.0 -22 1 -2 1.0 0 1)
                                         #'model:' #valueOfFileName
                                         #'acceptOnReturn:' false
                                         #'acceptOnTab:' false
@@ -205,13 +205,15 @@
                 )
                  #(#UISubSpecification
                     #'name:' 'SubSpecification'
-                    #'layout:' #(#LayoutFrame 2 0.0 -32 1 -2 1.0 -8 1.0)
+                    #'layout:' #(#LayoutFrame 2 0.0 -32 1 0 1.0 -8 1.0)
                     #'majorKey:' #ToolApplicationModel
                     #'minorKey:' #windowSpecForCommitWithoutChannels
                 )
               )
           )
       )
+
+    "Modified: / 6.2.1998 / 03:42:48 / cg"
 ! !
 
 !FileSelectionBrowser methodsFor:'accessing'!