> Maybe there are more > menu generator menthods like this. i.e. the CriticBrowser>packagesGroup: can be optimized the same way.
packagesGroup: aBuilder <nautilusGlobalGroupMenu> (aBuilder item: #'Critics Browser') action: [ | packages target env rules group | target := aBuilder model. group := target selectedGroups. packages := OrderedCollection new. group do: [ :each | each classes do: [ :cl | MCWorkingCopy managersForClass: cl do: [ :package | packages add: package ] ] ]. rules := RBCompositeLintRule allGoodRules. env := RBPackageEnvironment new packages: packages. self openOnRule: rules onEnvironment: env ]; help: 'Running critics rules on this group' Regards, Mike
