[Pkg] The Trunk: ToolsTests-fbs.26.mcz

[commits at source.squeak.org]

Levente Uzonyi uploaded a new version of ToolsTests to project The Trunk:
http://source.squeak.org/trunk/ToolsTests-fbs.26.mcz

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

Name: ToolsTests-fbs.26
Author: fbs
Time: 22 March 2011, 6:04:17.074 pm
UUID: df8a3d17-6ec5-de49-bf56-ade09572565d
Ancestors: ToolsTests-fbs.25

MessageSetTest with functional setUp/tearDown, and one failing test.

=============== Diff against ToolsTests-fbs.24 ===============

Item was added:
+ ----- Method: BrowserTest>>testShowHomeCategory (in category 'as yet unclassified') -----
+ testShowHomeCategory
+ 	browser selectSystemCategory: browser class category.
+ 	browser selectClass: browser class.
+ 	"Select '--all--'."
+ 	browser selectMessageCategoryNamed: browser messageCategoryList first.
+ 	browser selectMessageNamed: browser messageList first.
+ 	
+ 	browser showHomeCategory.
+ 	self assert: browser messageCategoryListIndex > 1.!

Item was added:
+ TestCase subclass: #MessageSetTest
+ 	instanceVariableNames: 'browser'
+ 	classVariableNames: ''
+ 	poolDictionaries: ''
+ 	category: 'ToolsTests-Browser'!

Item was added:
+ ----- Method: MessageSetTest>>setUp (in category 'as yet unclassified') -----
+ setUp
+ 	browser := (MessageSet
+ 		openMessageList: (SystemNavigation default allImplementorsOf: #browseAllImplementorsOf:)
+ 		name: 'Test MessageSet'
+ 		autoSelect: nil) model.!

Item was added:
+ ----- Method: MessageSetTest>>tearDown (in category 'as yet unclassified') -----
+ tearDown
+ 	ToolBuilder default close: browser topView.!

Item was added:
+ ----- Method: MessageSetTest>>testRemoveMessageFromBrowser (in category 'as yet unclassified') -----
+ testRemoveMessageFromBrowser
+ 	| sel |
+ 	browser messageListIndex: 1.
+ 	sel := browser selection.
+ 	
+ 	browser removeMessageFromBrowser.
+ 	self assert: (browser messageList includes: sel).!