enablementSelector: aSelector
enablementSelector := aSelector isBlock
ifTrue: [aSelector copyForSaving]
ifFalse: [aSelector] may be it would be good to get straight on the accepted parameter: because after we get this kind of logic….
