changeset 775 | 0ead717f3e35 |
parent 764 | 5722b94330ef |
child 804 | b66537045e04 |
--- a/MenuEditor.st Tue Apr 14 13:32:46 1998 +0200 +++ b/MenuEditor.st Tue Apr 14 13:33:49 1998 +0200 @@ -2408,11 +2408,7 @@ model root: firstNode. firstNode hasChildren ifFalse:[ - |firstChildNode| - firstChildNode := self nodeLabel:'Item 1'. - firstChildNode parent: firstNode. - firstNode add: firstChildNode. - model recomputeList + model add:(self nodeLabel:'Item 1') below:firstNode ]. @@ -2431,8 +2427,6 @@ ]. node expand. model root:node. - - model recomputeList ! menuItem:anItem