|  | @@ -1236,7 +1236,7 @@ allVariables
 | 
	
		
			
				|  |  |  	all := Dictionary new.
 | 
	
		
			
				|  |  |  
 | 
	
		
			
				|  |  |  	self receiver class allInstanceVariableNames do: [ :each |
 | 
	
		
			
				|  |  | -		all at: each put: (self receiver instVarAt: each) ].
 | 
	
		
			
				|  |  | +		all at: each put: (self receiver instVarNamed: each) ].
 | 
	
		
			
				|  |  |  	
 | 
	
		
			
				|  |  |  	selectedContext locals keysAndValuesDo: [ :key :value |
 | 
	
		
			
				|  |  |  		all at: key put: value ].
 |