author | Claus Gittinger <cg@exept.de> |
Tue, 12 Feb 2019 19:02:06 +0100 | |
changeset 5997 | dda46d10430a |
parent 5996 | e89a322b31da |
child 5998 | bb38ed2e191a |
--- a/HierarchicalList.st Tue Feb 12 19:01:33 2019 +0100 +++ b/HierarchicalList.st Tue Feb 12 19:02:06 2019 +0100 @@ -225,6 +225,14 @@ "Modified: / 01-08-2018 / 15:18:45 / Stefan Vogel" ! +itemAddAll:aListOfItems afterIndex:anIndex + "insert all items after an index" + + self addAll:aListOfItems afterIndex:anIndex + + "Created: / 12-02-2019 / 17:19:43 / Claus Gittinger" +! + itemAddAll:aListOfItems beforeIndex:anIndex "insert all items before an index"