Andreas Raab uploaded a new version of Morphic to project The Trunk:
http://source.squeak.org/trunk/Morphic-ar.162.mcz

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

Name: Morphic-ar.162
Author: ar
Time: 26 August 2009, 8:43:37 am
UUID: 60e7fb3a-0bc2-4c4d-809d-f0805b6dd068
Ancestors: Morphic-ar.161, Morphic-djr.161

Merged Morphic-djr.161:

Fix a bug where hitting alt-M on a string selection in a Workspace (among other combinations) would throw a MNU.

=============== Diff against Morphic-ar.161 ===============

Item was changed:
  ----- Method: TextMorphEditor>>setSearch: (in category 'accessing') -----
  setSearch: aString
  	| bk |
  	"Set the FindText and ChangeText to seek aString; except if already seeking aString, leave ChangeText alone so again will repeat last replacement."
  
  	(bk := morph ownerThatIsA: BookMorph) ifNotNil: [
  		bk setProperty: #tempSearchKey 
  			toValue: (aString findTokens: Character separators)].
  
+ 	aString ifNotNil: [
+ 		FindText string = aString
+ 			ifFalse: [FindText := ChangeText := aString asText]].!
- 
- 	FindText string = aString
- 		ifFalse: [FindText := ChangeText := aString asText]!