diff -r ae3028e45467 -r cabe3bd6fd74 UIPainter.st --- a/UIPainter.st Mon Jul 21 10:49:25 1997 +0200 +++ b/UIPainter.st Mon Jul 21 10:52:28 1997 +0200 @@ -960,9 +960,6 @@ ) ) #(#MenuItem - #'label:' '' - ) - #(#MenuItem #'label:' 'stepIn' #'value:' #doStepIn #'enabled:' #canStepIn @@ -980,7 +977,8 @@ #UIPainter #iconStepOut ) ) - ) nil + ) + #( 2 ) nil ) ! @@ -1240,7 +1238,13 @@ cls notNil ifTrue:[ (aspect := specTool specification menu) notNil ifTrue:[ aspect := aspect asSymbol + ] ifFalse:[ + aspect := treeView propertySelected. + aspect notNil ifTrue:[ + aspect := aspect view asMenu. + ] ]. + editor := MenuEditor new. editor masterApplication:self. editor activeHelpTool:(self activeHelpTool).