[Pkg] The Trunk: ToolsTests-fbs.41.mcz
commits at source.squeak.org
commits at source.squeak.org
Mon May 2 14:40:06 UTC 2011
Levente Uzonyi uploaded a new version of ToolsTests to project The Trunk:
http://source.squeak.org/trunk/ToolsTests-fbs.41.mcz
==================== Summary ====================
Name: ToolsTests-fbs.41
Author: fbs
Time: 1 May 2011, 9:07:16.867 am
UUID: d52dd484-bcdc-8b43-b7e2-7b741bab289a
Ancestors: ToolsTests-fbs.40
Maintain the currently selected message category and method when resorting the message categories (http://bugs.squeak.org/view.php?id=7626).
=============== Diff against ToolsTests-fbs.40 ===============
Item was added:
+ ----- Method: BrowserTest>>testAlphabetizingMethodsPreservesPlace (in category 'testing - message list') -----
+ testAlphabetizingMethodsPreservesPlace
+ | oldCategory oldMethod |
+ oldCategory := 'breakpoints'.
+ oldMethod := #toggleBreakOnEntry.
+ browser selectSystemCategory: browser class category.
+ browser selectClass: browser class.
+ browser selectMessageCategoryNamed: oldCategory.
+ browser selectMessageNamed: oldMethod.
+ browser alphabetizeMessageCategories.
+
+ self assert: browser selectedMessageCategoryName = oldCategory.
+ self assert: browser selectedMessageName = oldMethod.!
Item was added:
+ ----- Method: BrowserTest>>testAlphabetizingMethodsPreservesPlaceWhenNoMessageCategorySelected (in category 'testing - message list') -----
+ testAlphabetizingMethodsPreservesPlaceWhenNoMessageCategorySelected
+ browser selectSystemCategory: browser class category.
+ browser selectClass: browser class.
+ browser selectMessageCategoryNamed: nil.
+ browser selectMessageNamed: nil.
+ browser alphabetizeMessageCategories.
+
+ self assert: browser selectedMessageCategoryName = nil.
+ self assert: browser selectedMessageName = nil.!
Item was added:
+ ----- Method: BrowserTest>>testAlphabetizingMethodsPreservesPlaceWhenNoMethodSelected (in category 'testing - message list') -----
+ testAlphabetizingMethodsPreservesPlaceWhenNoMethodSelected
+ | oldCategory |
+ oldCategory := 'breakpoints'.
+ browser selectSystemCategory: browser class category.
+ browser selectClass: browser class.
+ browser selectMessageCategoryNamed: oldCategory.
+ browser selectMessageNamed: nil.
+ browser alphabetizeMessageCategories.
+
+ self assert: browser selectedMessageCategoryName = oldCategory.
+ self assert: browser selectedMessageName = nil.!
More information about the Packages
mailing list