The Trunk: MorphicTests-mt.51.mcz

Previous Topic Next Topic
 
classic Classic list List threaded Threaded
1 message Options
Reply | Threaded
Open this post in threaded view
|

The Trunk: MorphicTests-mt.51.mcz

commits-2
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.!