# HG changeset patch # User Claus Gittinger # Date 1371775211 -7200 # Node ID 3cdebdf0071db2679a005d753ec71352f422b469 # Parent 7ee98e6a7aabc080ced3685c6482a94ab70c4d5a class: UIPainterView changed: #groupSelectionWithLayout: MenuItem label:value: (obsolete) -> MenuItem label:itemValue: diff -r 7ee98e6a7aab -r 3cdebdf0071d UIPainterView.st --- a/UIPainterView.st Fri Jun 21 00:50:10 2013 +0200 +++ b/UIPainterView.st Fri Jun 21 02:40:11 2013 +0200 @@ -1854,19 +1854,21 @@ menu := Menu new. menu receiver: self. - menu addItem:(MenuItem label:'Box' value:[spec := ViewSpec new]). - menu addItem:(MenuItem label:'TBox' value:[spec := TBoxSpec new]). - menu addItem:(MenuItem label:'FramedBox' value:[spec := FramedBoxSpec new]). - - menu addItem:(MenuItem label:'HorizontalPanel' - value:[ + menu addItem:(MenuItem label:'Box' itemValue:[spec := ViewSpec new]). + menu addItem:(MenuItem label:'TBox' itemValue:[spec := TBoxSpec new]). + menu addItem:(MenuItem label:'FramedBox' itemValue:[spec := FramedBoxSpec new]). + + menu addItem:(MenuItem + label:'HorizontalPanel' + itemValue:[ keepLyt := keepPos := false. spec := HorizontalPanelViewSpec new. spec verticalLayout: #fit. spec horizontalLayout: #leftSpace. ]). - menu addItem:(MenuItem label:'VerticalPanel' - value:[ + menu addItem:(MenuItem + label:'VerticalPanel' + itemValue:[ keepLyt := keepPos := false. spec := VerticalPanelViewSpec new. spec verticalLayout: #topSpace.