author | Claus Gittinger <cg@exept.de> |
Fri, 21 Jul 2017 14:21:03 +0200 | |
changeset 5559 | 90b5376eb78d |
parent 5558 | 25a55f2557e1 |
child 5560 | 0e2bba0da0ff |
MenuPanel.st | file | annotate | diff | comparison | revisions |
--- a/MenuPanel.st Fri Jul 21 10:09:50 2017 +0200 +++ b/MenuPanel.st Fri Jul 21 14:21:03 2017 +0200 @@ -2502,6 +2502,15 @@ !MenuPanel methodsFor:'adding & removing'! +addSeparator + |item| + + item := self createItemAtIndex:nil. + item label:'-'. + + "Created: / 21-07-2017 / 13:02:28 / cg" +! + createAtIndex:anIndexOrNil <resource: #obsolete>