[squeak-dev] The Inbox: MorphicTests-ct.61.mcz

commits at source.squeak.org commits at source.squeak.org
Fri Mar 20 19:07:44 UTC 2020


Christoph Thiede uploaded a new version of MorphicTests to project The Inbox:
http://source.squeak.org/inbox/MorphicTests-ct.61.mcz

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

Name: MorphicTests-ct.61
Author: ct
Time: 20 March 2020, 8:07:43.181237 pm
UUID: e1d09ce3-9d2a-6440-ad10-b469b1163316
Ancestors: MorphicTests-mt.60

Renames misspelled test selector.

=============== Diff against MorphicTests-mt.60 ===============

Item was added:
+ ----- Method: MorphicEventTests>>test02MouseOver (in category 'tests') -----
+ test02MouseOver
+ 
+ 	| m1 m2 |
+ 	m1 := MorphForEventTests new.
+ 	m2 := MorphForEventTests new.
+ 	
+ 	m1 extent: 20 at 20; topLeft: 0 at 0.
+ 	m2 extent: 20 at 20; topLeft: 40 at 0.
+ 	
+ 	m1 openInWorld: world.
+ 	m2 openInWorld: world.
+ 	
+ 	hand handleEvent: (self redMouseDownAt: m1 center).
+ 	hand handleEvent: (self redMouseUpAt: m1 center).
+ 	hand handleEvent: (self redMouseDownAt: m2 center).
+ 	hand handleEvent: (self redMouseUpAt: m2 center).
+ 	
+ 	self
+ 		checkEventOrder: #(mouseMove mouseEnter mouseDown mouseUp mouseLeave)
+ 		forEvents: m1 eventsDuringBubble
+ 		ignoreMouseOver: true.	
+ 	
+ 	self
+ 		checkEventOrder: #(mouseMove mouseEnter mouseDown mouseUp)
+ 		forEvents: m2 eventsDuringBubble
+ 		ignoreMouseOver: true.
+ 	!

Item was removed:
- ----- Method: MorphicEventTests>>test02MouserOver (in category 'tests') -----
- test02MouserOver
- 
- 	| m1 m2 |
- 	m1 := MorphForEventTests new.
- 	m2 := MorphForEventTests new.
- 	
- 	m1 extent: 20 at 20; topLeft: 0 at 0.
- 	m2 extent: 20 at 20; topLeft: 40 at 0.
- 	
- 	m1 openInWorld: world.
- 	m2 openInWorld: world.
- 	
- 	hand handleEvent: (self redMouseDownAt: m1 center).
- 	hand handleEvent: (self redMouseUpAt: m1 center).
- 	hand handleEvent: (self redMouseDownAt: m2 center).
- 	hand handleEvent: (self redMouseUpAt: m2 center).
- 	
- 	self
- 		checkEventOrder: #(mouseMove mouseEnter mouseDown mouseUp mouseLeave)
- 		forEvents: m1 eventsDuringBubble
- 		ignoreMouseOver: true.	
- 	
- 	self
- 		checkEventOrder: #(mouseMove mouseEnter mouseDown mouseUp)
- 		forEvents: m2 eventsDuringBubble
- 		ignoreMouseOver: true.
- 	!



More information about the Squeak-dev mailing list