Marcel Taeumel uploaded a new version of MorphicTests to project The Trunk:
http://source.squeak.org/trunk/MorphicTests-mt.51.mcz==================== Summary ====================
Name: MorphicTests-mt.51
Author: mt
Time: 6 September 2019, 4:05:44.828193 pm
UUID: 30a7b47d-a04e-bf4a-b111-345fc7c2b7c7
Ancestors: MorphicTests-pre.50
Complements Morphic-mt.1516
=============== Diff against MorphicTests-pre.50 ===============
Item was changed:
----- Method: MorphTest>>getWorld (in category 'initialize-release') -----
getWorld
+ ^ world ifNil: [world := PasteUpMorph newWorldForProject: nil]!
- ^ world ifNil: [
- world := PasteUpMorph newWorldForProject: nil.
- world
- viewBox: (0@0 extent: world extent);
- yourself]!
Item was added:
+ ----- Method: UserInputEventTests class>>isAbstract (in category 'testing') -----
+ isAbstract
+
+ ^ self == UserInputEventTests!
Item was changed:
----- Method: UserInputEventTests>>setUp (in category 'running') -----
setUp
super setUp.
world := (PasteUpMorph newWorldForProject: nil)
extent: 300@200;
- viewBox: (0@0 extent: 300@200);
yourself.
- (world instVarNamed: #worldState)
- instVarNamed: #canvas
- put: (Form extent: 300@200 depth: 32) getCanvas.
-
hand := HandMorphForEventTests new.
world
removeHand: world firstHand; "the default hand"
addHand: hand.!