|  | @@ -1267,8 +1267,7 @@ searchReferencedClassesFor: aString
 | 
	
		
			
				|  |  |  searchSelectorReferencesFor: aString
 | 
	
		
			
				|  |  |  	self classesAndMetaclasses do: [:each | 
 | 
	
		
			
				|  |  |  		each methodDictionary keysAndValuesDo: [:key :value | 
 | 
	
		
			
				|  |  | -			key = selector ifTrue: [self implementors add: value]].
 | 
	
		
			
				|  |  | -		each methodDictionary keysAndValuesDo: [:key :value | 
 | 
	
		
			
				|  |  | +			key = selector ifTrue: [self implementors add: value].
 | 
	
		
			
				|  |  |  			(value messageSends includes: selector) ifTrue: [
 | 
	
		
			
				|  |  |  				self senders add: value]]]
 | 
	
		
			
				|  |  |  ! !
 |