ResourceSelectionBrowser.st
changeset 426 b8110a424326
parent 425 cf47d420764a
child 434 7b49551267fb
--- a/ResourceSelectionBrowser.st	Sat Jan 17 21:53:41 1998 +0100
+++ b/ResourceSelectionBrowser.st	Sat Jan 17 22:33:10 1998 +0100
@@ -87,11 +87,11 @@
           #'window:' 
            #(#WindowSpec
               #'name:' 'Resource Browser'
-              #'layout:' #(#LayoutFrame 177 0 194 0 576 0 493 0)
+              #'layout:' #(#LayoutFrame 120 0 317 0 519 0 616 0)
               #'label:' 'Resource Browser'
               #'min:' #(#Point 400 300)
               #'max:' #(#Point 1152 864)
-              #'bounds:' #(#Rectangle 177 194 577 494)
+              #'bounds:' #(#Rectangle 120 317 520 617)
               #'usePreferredExtent:' false
           )
           #'component:' 
@@ -177,32 +177,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:' 'actionButton2'
-                              #'label:' 'Cancel'
-                              #'model:' #cancel
-                              #'extent:' #(#Point 99 24)
-                          )
-                           #(#ActionButtonSpec
-                              #'name:' 'actionButton1'
-                              #'label:' 'OK'
-                              #'model:' #accept
-                              #'extent:' #(#Point 99 24)
-                          )
-                        )
-                    )
-                    #'level:' 1
-                    #'horizontalLayout:' #center
-                    #'verticalLayout:' #center
-                    #'horizontalSpace:' 3
-                    #'verticalSpace:' 3
+                 #(#UISubSpecification
+                    #'name:' 'SubSpecification'
+                    #'layout:' #(#LayoutFrame 2 0 -32 1 -2 1 -8 1)
+                    #'majorKey:' #ToolApplicationModel
+                    #'minorKey:' #windowSpecForCommit
                 )
               )
           )