[Pkg] The Trunk: ToolsTests-ul.73.mcz
commits at source.squeak.org
commits at source.squeak.org
Fri Aug 14 20:35:08 UTC 2015
Levente Uzonyi uploaded a new version of ToolsTests to project The Trunk:
http://source.squeak.org/trunk/ToolsTests-ul.73.mcz
==================== Summary ====================
Name: ToolsTests-ul.73
Author: ul
Time: 14 August 2015, 7:51:04.12 pm
UUID: 96d8803b-6424-4249-8fbf-fa62eb44c966
Ancestors: ToolsTests-topa.72
#includesSubString: -> #includesSubstring:
=============== Diff against ToolsTests-topa.72 ===============
Item was changed:
----- Method: BrowserTest>>testClassCommentAnnotation (in category 'as yet unclassified') -----
testClassCommentAnnotation
| annotation |
browser selectSystemCategory: browser class category.
browser selectClass: browser class.
annotation := browser annotationForClassCommentFor: browser class.
+ self assert: (annotation includesSubstring: browser class organization commentStamp).
+ self assert: (annotation includesSubstring: 'class comment for').
+ self assert: (annotation includesSubstring: browser className).!
- self assert: (annotation includesSubString: browser class organization commentStamp).
- self assert: (annotation includesSubString: 'class comment for').
- self assert: (annotation includesSubString: browser className).!
Item was changed:
----- Method: BrowserTest>>testClassCommentAnnotationIgnoresParameter (in category 'as yet unclassified') -----
testClassCommentAnnotationIgnoresParameter
| annotation |
browser selectSystemCategory: browser class category.
browser selectClass: browser class.
"And the method ignores the parameter:"
annotation := browser annotationForClassCommentFor: browser class superclass.
+ self assert: (annotation includesSubstring: browser className).!
- self assert: (annotation includesSubString: browser className).!
Item was changed:
----- Method: BrowserTest>>testLabelStringAlwaysShowsBrowserType (in category 'as yet unclassified') -----
testLabelStringAlwaysShowsBrowserType
browser selectSystemCategory: browser class category.
+ self assert: (browser labelString includesSubstring: 'System Browser').
- self assert: (browser labelString includesSubString: 'System Browser').
browser selectClass: browser class.
+ self assert: (browser labelString includesSubstring: 'System Browser').
- self assert: (browser labelString includesSubString: 'System Browser').
browser selectSystemCategory: DependencyBrowser category.
browser selectClass: DependencyBrowser.
+ self assert: (browser labelString includesSubstring: 'System Browser').!
- self assert: (browser labelString includesSubString: 'System Browser').!
Item was changed:
----- Method: BrowserTest>>testLabelStringShowsBrowsedClassName (in category 'as yet unclassified') -----
testLabelStringShowsBrowsedClassName
browser selectSystemCategory: DependencyBrowser category.
browser selectClass: DependencyBrowser.
+ self assert: (browser labelString includesSubstring: DependencyBrowser name).!
- self assert: (browser labelString includesSubString: DependencyBrowser name).!
More information about the Packages
mailing list