[squeak-dev] The Trunk: Morphic-ar.162.mcz

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]!