#REFACTORING by cg
authorClaus Gittinger <cg@exept.de>
Sat, 22 Sep 2018 12:47:49 +0200
changeset 6438 1edb7e27eddf
parent 6437 8cebd063aeb5
child 6439 5445f50f8b2b
#REFACTORING by cg class: MenuView changed: #addItemList:resources:after:
MenuView.st
--- a/MenuView.st	Fri Sep 21 15:33:47 2018 +0200
+++ b/MenuView.st	Sat Sep 22 12:47:49 2018 +0200
@@ -537,11 +537,13 @@
 
 addItemList:list resources:resources after:itemNameOrSelector
     self 
-        addLabels:(list collect:[:row | row at:1])
-        selectors:(list collect:[:row | row at:2 ifAbsent:nil])
-        accelerators:(list collect:[:row | row at:3 ifAbsent:nil])
+        addLabels:(list collectColumn:1)
+        selectors:(list collectColumn:2 ifAbsent:nil)
+        accelerators:(list collectColumn:3 ifAbsent:nil)
         resources:resources
         after:itemNameOrSelector
+
+    "Modified: / 22-09-2018 / 11:25:35 / Claus Gittinger"
 !
 
 addLabel:aLabel selector:aSelector