[squeak-dev] The Inbox: ToolsTests-fbs.23.mcz

commits at source.squeak.org commits at source.squeak.org
Thu Mar 17 11:20:11 UTC 2011


A new version of ToolsTests was added to project The Inbox:
http://source.squeak.org/inbox/ToolsTests-fbs.23.mcz

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

Name: ToolsTests-fbs.23
Author: fbs
Time: 17 March 2011, 7:28:22.74 am
UUID: 06d9813c-e6ce-294d-9c3a-290dab76d49c
Ancestors: ToolsTests-fbs.22

The start of removing messageListIndex: added the instvar, setting it in parallel with messageListIndex in places where we have tests.

=============== Diff against ToolsTests-fbs.22 ===============

Item was added:
+ ----- Method: BrowserTest>>testBuildMessageCategoryBrowserEditString (in category 'as yet unclassified') -----
+ testBuildMessageCategoryBrowserEditString
+ 	| spawn |
+ 	browser selectSystemCategory: browser class category.
+ 	browser selectClass: browser class.
+ 	browser messageCategoryListIndex: 1.
+ 	browser messageListIndex: 1.
+ 	
+ 	spawn := browser buildMessageCategoryBrowserEditString: 'We don''t yet test that we do the right thing with this string!!'.
+ 	[self assert: spawn selectedSystemCategory = browser selectedSystemCategory.
+ 	self assert: spawn selectedClass = browser selectedClass.
+ 	self assert: spawn messageCategoryListIndex = browser messageCategoryListIndex.
+ 	self assert: spawn messageListIndex = browser messageListIndex]
+ 		ensure: [ ToolBuilder default close: spawn topView ].!

Item was added:
+ ----- Method: BrowserTest>>testBuildMessageCategoryBrowserEditStringNoCategorySelected (in category 'as yet unclassified') -----
+ testBuildMessageCategoryBrowserEditStringNoCategorySelected
+ 	browser selectSystemCategory: browser class category.
+ 	browser selectClass: browser class.
+ 	browser messageCategoryListIndex: 0.
+ 	
+ 	self assert: (browser buildMessageCategoryBrowserEditString: 'foo') isNil.!

Item was added:
+ ----- Method: BrowserTest>>testHasMessageCategorySelected (in category 'as yet unclassified') -----
+ testHasMessageCategorySelected
+ 	browser selectSystemCategory: browser class category.
+ 	browser selectClass: browser class.
+ 	browser messageCategoryListIndex: 0.
+ 	self deny: browser hasMessageCategorySelected.
+ 	
+ 	browser messageCategoryListIndex: 1.
+ 	self assert: browser hasMessageCategorySelected.
+ 	
+ 	browser messageCategoryListIndex: 0.
+ 	self deny: browser hasMessageCategorySelected.!

Item was added:
+ ----- Method: BrowserTest>>testHasMessageSelected (in category 'as yet unclassified') -----
+ testHasMessageSelected
+ 	browser selectSystemCategory: browser class category.
+ 	browser selectClass: browser class.
+ 	browser messageCategoryListIndex: 1.
+ 	
+ 	self deny: browser hasMessageSelected.
+ 	
+ 	browser messageListIndex: 0.
+ 	self deny: browser hasMessageSelected.
+ 	
+ 	browser messageListIndex: 1.
+ 	self assert: browser hasMessageSelected.
+ 	
+ 	browser messageListIndex: 0.
+ 	self deny: browser hasMessageSelected.!

Item was added:
+ ----- Method: BrowserTest>>testMessageCategoryListIndex (in category 'as yet unclassified') -----
+ testMessageCategoryListIndex
+ 	browser selectSystemCategory: browser class category.
+ 	browser selectClass: browser class.
+ 	
+ 	self assert: browser messageCategoryList size > 1 description: 'Sanity check: test refers to first two categories.'.
+ 	
+ 	browser messageCategoryListIndex: 0.
+ 	self assert: browser selectedMessageCategoryName isNil.
+ 	
+ 	browser messageCategoryListIndex: 1.
+ 	self assert: browser selectedMessageCategoryName = browser messageCategoryList first.
+ 	
+ 	browser messageListIndex: 1.
+ 	browser messageCategoryListIndex: 2.
+ 	self assert: browser selectedMessageName isNil description: 'Changing category deselects method'.!

Item was added:
+ ----- Method: BrowserTest>>testSelectMessageCategoryEditSelection (in category 'as yet unclassified') -----
+ testSelectMessageCategoryEditSelection
+ 	browser selectSystemCategory: browser class category.
+ 	browser selectClass: browser class.
+ 	browser selectMessageCategoryNamed: browser messageCategoryList first.
+ 	
+ 	self assert: browser editSelection = #newMessage.!

Item was added:
+ ----- Method: BrowserTest>>testSelectMessageCategoryEditSelectionNoMsgCat (in category 'as yet unclassified') -----
+ testSelectMessageCategoryEditSelectionNoMsgCat
+ 	browser selectSystemCategory: browser class category.
+ 	browser selectClass: browser class.
+ .
+ 	browser messageCategoryListIndex: 0.
+ 	
+ 	self assert: browser editSelection = #editClass.!

Item was added:
+ ----- Method: BrowserTest>>testSelectMessageCategoryEditSelectionNoMsgCatNoClass (in category 'as yet unclassified') -----
+ testSelectMessageCategoryEditSelectionNoMsgCatNoClass
+ 	browser selectSystemCategory: browser class category.
+ 	browser selectClass: nil.
+ .
+ 	browser messageCategoryListIndex: 0.
+ 	
+ 	self assert: browser editSelection = #newClass.!




More information about the Squeak-dev mailing list