#storeOn: senders reject: [ :each | 
	(each selector = #storeOn:) or: [
		each methodClass isPharoClass not or: [
			each selector beginsWith: 'test' ] ] ]