[squeak-dev] The Inbox: ToolsTests-fbs.31.mcz
commits at source.squeak.org
commits at source.squeak.org
Wed Mar 23 22:12:03 UTC 2011
A new version of ToolsTests was added to project The Inbox:
http://source.squeak.org/inbox/ToolsTests-fbs.31.mcz
==================== Summary ====================
Name: ToolsTests-fbs.31
Author: fbs
Time: 23 March 2011, 10:07:47.04 pm
UUID: da97ab65-9442-8b42-9b76-5110e3223367
Ancestors: ToolsTests-fbs.30
Tests for MessageNames>>openMessageNames, and a failing marker test.
=============== Diff against ToolsTests-fbs.30 ===============
Item was added:
+ TestCase subclass: #MessageNamesTest
+ instanceVariableNames: 'browser'
+ classVariableNames: ''
+ poolDictionaries: ''
+ category: 'ToolsTests-Browser'!
Item was added:
+ ----- Method: MessageNamesTest>>setUp (in category 'as yet unclassified') -----
+ setUp
+ browser := MessageNames openMessageNames.!
Item was added:
+ ----- Method: MessageNamesTest>>tearDown (in category 'as yet unclassified') -----
+ tearDown
+ ToolBuilder default close: browser topView.!
Item was added:
+ ----- Method: MessageNamesTest>>testMessageList (in category 'as yet unclassified') -----
+ testMessageList
+ browser searchString: 'cull'.
+ browser selectorListIndex: 0.
+ self assert: browser messageList isEmpty.
+
+ browser selectorListIndex: 2.
+ self deny: browser messageList isEmpty.!
Item was added:
+ ----- Method: MessageNamesTest>>testOpenMessageNames (in category 'as yet unclassified') -----
+ testOpenMessageNames
+ | b |
+ b := MessageNames openMessageNames.
+ [self assert: (b isKindOf: MessageNames)]
+ ensure: [ToolBuilder default close: b topView].!
Item was added:
+ ----- Method: MessageNamesTest>>testSearchString (in category 'as yet unclassified') -----
+ testSearchString
+ | cCount cullCount cullCullCount |
+ browser searchString: 'c'.
+ cCount := browser selectorList size.
+
+ browser searchString: 'cull:'.
+ cullCount := browser selectorList size.
+
+ self assert: cullCount < cCount.
+
+ browser searchString: 'cull:cull:'.
+ cullCullCount := browser selectorList size.
+
+ self assert: cullCullCount < cullCount.!
More information about the Squeak-dev
mailing list
|