[squeak-dev] The Trunk: Morphic-mt.1442.mcz

commits at source.squeak.org commits at source.squeak.org
Thu May 24 15:33:19 UTC 2018


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

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

Name: Morphic-mt.1442
Author: mt
Time: 24 May 2018, 5:31:38.262534 pm
UUID: 76c0504e-df49-4fcb-b231-ecd8b81b11a5
Ancestors: Morphic-mt.1441

Fixes the flickering of the text cursor over clickable text actions (such as TextURL).

=============== Diff against Morphic-mt.1441 ===============

Item was changed:
  ----- Method: TextMorph>>enterClickableRegion: (in category 'editing') -----
  enterClickableRegion: evt
  	| index isLink |
+ 	evt hand hasSubmorphs ifTrue:[^false].
- 	evt hand hasSubmorphs ifTrue:[^self].
  	paragraph ifNotNil:[
  		index := (paragraph characterBlockAtPoint: evt position) stringIndex.
  		isLink := (paragraph text attributesAt: index forStyle: paragraph textStyle) 
  					anySatisfy:[:attr| attr mayActOnClick].
+ 		isLink ifTrue: [
+ 			evt hand showTemporaryCursor: Cursor webLink.
+ 			^ true]].
+ 	^ false
- 		isLink ifTrue:[evt hand showTemporaryCursor: Cursor webLink].
- 	].
  !

Item was changed:
  ----- Method: TextMorph>>mouseMove: (in category 'event handling') -----
  mouseMove: evt
  
  	evt redButtonPressed ifFalse: [
+ 		(self enterClickableRegion: evt)
+ 			ifFalse: [self editor updateCursorForEvent: evt].
- 		self editor updateCursorForEvent: evt.
- 		self enterClickableRegion: evt.
  		^ self].
  
  	self
  		handleInteraction: [self editor mouseMove: evt]
  		fromEvent: evt.!



More information about the Squeak-dev mailing list