FileSelectionBrowser.st
changeset 426 b8110a424326
parent 404 35982cf1482f
child 452 d6d5eceb23a9
--- a/FileSelectionBrowser.st	Sat Jan 17 21:53:41 1998 +0100
+++ b/FileSelectionBrowser.st	Sat Jan 17 22:33:10 1998 +0100
@@ -133,11 +133,11 @@
           #'window:' 
            #(#WindowSpec
               #'name:' 'File Selection Browser'
-              #'layout:' #(#LayoutFrame 130 0 174 0 529 0 473 0)
+              #'layout:' #(#LayoutFrame 32 0 298 0 431 0 597 0)
               #'label:' 'File Selection Browser'
               #'min:' #(#Point 10 10)
               #'max:' #(#Point 1152 900)
-              #'bounds:' #(#Rectangle 130 174 530 474)
+              #'bounds:' #(#Rectangle 32 298 432 598)
               #'usePreferredExtent:' false
           )
           #'component:' 
@@ -200,32 +200,11 @@
                     )
                     #'handles:' #(#Any 0.5 1.0)
                 )
-                 #(#HorizontalPanelViewSpec
-                    #'name:' 'horizontalPanelView'
-                    #'layout:' #(#LayoutFrame 0 0.0 -40 1 0 1.0 0 1.0)
-                    #'component:' 
-                     #(#SpecCollection
-                        #'collection:' 
-                         #(
-                           #(#ActionButtonSpec
-                              #'name:' 'cancelButton'
-                              #'label:' 'Cancel'
-                              #'model:' #cancel
-                              #'extent:' #(#Point 100 22)
-                          )
-                           #(#ActionButtonSpec
-                              #'name:' 'okButton'
-                              #'label:' 'OK'
-                              #'model:' #accept
-                              #'extent:' #(#Point 100 22)
-                          )
-                        )
-                    )
-                    #'level:' 1
-                    #'horizontalLayout:' #center
-                    #'verticalLayout:' #center
-                    #'horizontalSpace:' 3
-                    #'verticalSpace:' 3
+                 #(#UISubSpecification
+                    #'name:' 'SubSpecification'
+                    #'layout:' #(#LayoutFrame 2 0.0 -32 1 -2 1.0 -8 1.0)
+                    #'majorKey:' #ToolApplicationModel
+                    #'minorKey:' #windowSpecForCommit
                 )
               )
           )