# HG changeset patch # User Claus Gittinger # Date 886131421 -3600 # Node ID ca500f8698eb1ceca91c828d4d59fb371af454f4 # Parent badaac1d45e7ff44d236e84dfea0678006afb842 added ModelButton diff -r badaac1d45e7 -r ca500f8698eb UISelectionPanel.st --- a/UISelectionPanel.st Thu Jan 29 20:14:41 1998 +0100 +++ b/UISelectionPanel.st Fri Jan 30 04:37:01 1998 +0100 @@ -371,11 +371,12 @@ #'window:' #(#WindowSpec #'name:' 'Buttons' - #'layout:' #(#LayoutFrame 104 0 416 0 582 0 615 0) + #'layout:' #(#LayoutFrame 74 0 56 0 552 0 255 0) #'label:' 'Buttons' #'min:' #(#Point 10 10) #'max:' #(#Point 1280 1024) - #'bounds:' #(#Rectangle 104 416 583 616) + #'bounds:' #(#Rectangle 74 56 553 256) + #'usePreferredExtent:' false ) #'component:' #(#SpecCollection @@ -462,11 +463,16 @@ #'label:' 'dismiss' #'model:' #closeRequest ) + #(#ButtonSpec + #'name:' 'ModelButton' + #'layout:' #(#LayoutFrame 135 0 139 0 234 0 161 0) + #'label:' 'ModelButton' + ) ) ) ) - "Modified: 4.10.1997 / 15:06:03 / cg" + "Modified: / 30.1.1998 / 04:35:59 / cg" ! standardCanvas