Levente Uzonyi uploaded a new version of Morphic to project The Trunk:
http://source.squeak.org/trunk/Morphic-ul.530.mcz

==================== Summary ====================

Name: Morphic-ul.530
Author: ul
Time: 27 April 2011, 1:13:07.939 am
UUID: b0a03730-6c09-3145-a7a8-f8b21779ae62
Ancestors: Morphic-ul.529

TextEditor >> #referencesToIt shows references to all kind of variables and globals.

=============== Diff against Morphic-ul.529 ===============

Item was changed:
  ----- Method: TextEditor>>referencesToIt (in category 'menu messages') -----
  referencesToIt
+ 	"Open a MessageSet with the references to the selected global or variable name."
- 	"Open a references browser on the selected symbol"
  
+ 	| selection environment binding |
+ 	self selectWord.
- 	| symbol environment binding |
- 	self selectLine.
- 	symbol := self selectedSymbol ifNil: [ ^morph flash ].
  	environment := (model respondsTo: #selectedClassOrMetaClass)
  		ifTrue: [ model selectedClassOrMetaClass ifNil: [ Smalltalk globals ] ]
  		ifFalse: [ Smalltalk globals ].
+ 	selection := self selectedSymbol ifNil: [ self selection asString ].
+ 	(environment isBehavior and: [ 
+ 		(environment instVarIndexFor: selection ifAbsent: [ 0 ]) ~= 0 ]) ifTrue: [ 
+ 			^self systemNavigation browseAllAccessesTo: selection from: environment ].
+ 	selection isSymbol ifFalse: [ ^morph flash ].
+ 	binding := (environment bindingOf: selection) ifNil: [ ^morph flash ].
- 	binding := (environment bindingOf: symbol) ifNil: [ ^morph flash ].
  	self systemNavigation browseAllCallsOn: binding!