equal
deleted
inserted
replaced
1895 menu addItem:(MenuItem |
1895 menu addItem:(MenuItem |
1896 label:'HorizontalPanel' |
1896 label:'HorizontalPanel' |
1897 itemValue:[ |
1897 itemValue:[ |
1898 keepLyt := keepPos := false. |
1898 keepLyt := keepPos := false. |
1899 spec := HorizontalPanelViewSpec new. |
1899 spec := HorizontalPanelViewSpec new. |
1900 spec verticalLayout: #fit. |
1900 spec horizontalLayout: #leftSpace verticalLayout: #fit. |
1901 spec horizontalLayout: #leftSpace. |
|
1902 ]). |
1901 ]). |
1903 menu addItem:(MenuItem |
1902 menu addItem:(MenuItem |
1904 label:'VerticalPanel' |
1903 label:'VerticalPanel' |
1905 itemValue:[ |
1904 itemValue:[ |
1906 keepLyt := keepPos := false. |
1905 keepLyt := keepPos := false. |
1907 spec := VerticalPanelViewSpec new. |
1906 spec := VerticalPanelViewSpec new. |
1908 spec verticalLayout: #topSpace. |
1907 spec horizontalLayout: #fit verticalLayout: #topSpace. |
1909 spec horizontalLayout: #fit. |
|
1910 ]). |
1908 ]). |
1911 |
1909 |
1912 menu startUp. |
1910 menu startUp. |
1913 spec isNil ifTrue:[^ self]. |
1911 spec isNil ifTrue:[^ self]. |
1914 |
1912 |