A new version of MorphicTests was added to project The Inbox:
http://source.squeak.org/inbox/MorphicTests-dcorking.19.mcz

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

Name: MorphicTests-dcorking.19
Author: dcorking
Time: 23 January 2013, 8:53:55.999 pm
UUID: d40a90e7-c4ba-4b13-a5f2-3a134d57602c
Ancestors: MorphicTests-ar.18

added support for 'CalendarChooserMorph new openInWorld'

=============== Diff against MorphicTests-ar.18 ===============

Item was changed:
  SystemOrganization addCategory: #'MorphicTests-Basic'!
  SystemOrganization addCategory: #'MorphicTests-Kernel'!
  SystemOrganization addCategory: #'MorphicTests-Layouts'!
  SystemOrganization addCategory: #'MorphicTests-Support'!
  SystemOrganization addCategory: #'MorphicTests-Text Support'!
  SystemOrganization addCategory: #'MorphicTests-Widgets'!
  SystemOrganization addCategory: #'MorphicTests-Worlds'!
+ SystemOrganization addCategory: #'MorphicTests-CalendarChooser'!

Item was added:
+ TestCase subclass: #CalendarChooserTest
+ 	instanceVariableNames: 'defaultChooser secondChooser'
+ 	classVariableNames: ''
+ 	poolDictionaries: ''
+ 	category: 'MorphicTests-CalendarChooser'!

Item was added:
+ ----- Method: CalendarChooserTest>>setUp (in category 'running') -----
+ setUp
+ 	defaultChooser := CalendarChooserMorph new openInWorld.
+ 	secondChooser := CalendarChooserMorph openOn: '23 February 3245' asDate.
+ !

Item was added:
+ ----- Method: CalendarChooserTest>>tearDown (in category 'running') -----
+ tearDown
+ 	defaultChooser delete.
+ 	secondChooser delete.
+ !

Item was added:
+ ----- Method: CalendarChooserTest>>testDefaultDateShouldBeToday (in category 'testing') -----
+ testDefaultDateShouldBeToday
+ 	"Can create a chooser without specifiying a date with
+ 	CalendarChooserMorph new openInWorld"
+ 	self assert: defaultChooser date = Date today.!

Item was added:
+ ----- Method: CalendarChooserTest>>testShouldBeCreatedWithTheRequiredDate (in category 'testing') -----
+ testShouldBeCreatedWithTheRequiredDate
+ 	self assert: secondChooser date = '23 February 3245' asDate.!

Item was added:
+ ----- Method: CalendarChooserTest>>testShouldOpenInTheWorld (in category 'testing') -----
+ testShouldOpenInTheWorld
+ 	self assert: (defaultChooser owner isKindOf: PasteUpMorph).
+ 	self assert: (secondChooser owner isKindOf: PasteUpMorph).
+ !