[Pkg] The Trunk: Morphic-mt.1389.mcz

[commits at source.squeak.org]

Marcel Taeumel uploaded a new version of Morphic to project The Trunk:
http://source.squeak.org/trunk/Morphic-mt.1389.mcz

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

Name: Morphic-mt.1389
Author: mt
Time: 25 January 2018, 9:36:50.24119 am
UUID: e130a338-787f-d84a-8782-a6a9724ddddf
Ancestors: Morphic-mt.1388

Small fix for draggable text selections regarding the mouse cursor appearance.

=============== Diff against Morphic-mt.1388 ===============

Item was changed:
  ----- Method: TextEditor>>mouseUp: (in category 'events') -----
  mouseUp: evt
  	"An attempt to break up the old processRedButton code into threee phases"
  
- 	self updateCursorForEvent: evt.
- 	morph removeProperty: #waitingForTextDrag.
- 
  	oldInterval ifNil: [^ self].  "Patched during clickAt: repair"
  	(self hasCaret 
  		and: [oldInterval = self selectionInterval])
  		ifTrue: [self selectWord].
  	self setEmphasisHere.
  	(self isDisjointFrom: oldInterval) ifTrue:
  		[otherInterval := oldInterval].
+ 	self storeSelectionInParagraph.
+ 
+ 	self updateCursorForEvent: evt.
+ 	morph removeProperty: #waitingForTextDrag.!
- 	self storeSelectionInParagraph!