Marcel Taeumel uploaded a new version of CollectionsTests to project The Trunk: http://source.squeak.org/trunk/CollectionsTests-mt.386.mcz
==================== Summary ====================
Name: CollectionsTests-mt.386 Author: mt Time: 29 March 2023, 11:46:09.135107 am UUID: 4eac586d-966a-a248-b6df-63cdbbab87ae Ancestors: CollectionsTests-tpr.385
Tests for Collections-mt.1031
=============== Diff against CollectionsTests-tpr.385 ===============
Item was added: + ----- Method: TextTest>>testAsPlainText (in category 'tests - plain text') ----- + testAsPlainText + + | exampleString exampleText | + exampleString := 'hello'. + exampleText := exampleString asText. + exampleText addAttribute: TextColor yellow. + + self assert: exampleString asPlainText isPlainText. + self assert: exampleText asPlainText isPlainText.!
Item was added: + ----- Method: TextTest>>testAsPlainTextIdentity (in category 'tests - plain text') ----- + testAsPlainTextIdentity + + | exampleString exampleText | + exampleString := 'hello'. + exampleText := exampleString asText. + + self assert: exampleString == exampleString asPlainText. + self assert: exampleText == exampleText asPlainText. + + exampleText addAttribute: TextColor yellow. + self deny: exampleText == exampleText asPlainText. + self assert: exampleText hasColorAttribute.!
Item was added: + ----- Method: TextTest>>testHasAnyAttribute (in category 'tests - plain text') ----- + testHasAnyAttribute + + | exampleText | + exampleText := 'hello' asText. + exampleText addAttribute: TextColor yellow. + + self assert: exampleText hasAnyAttribute. + exampleText removeAllAttributes. + self deny: exampleText hasAnyAttribute. + + exampleText addAttribute: TextAlignment centered. + self assert: exampleText hasAnyAttribute. + self assert: exampleText isPlainText.!
Item was added: + ----- Method: TextTest>>testIsPlainText (in category 'tests - plain text') ----- + testIsPlainText + + self assert: 'hello' isPlainText. + self assert: 'hello' asText isPlainText. + + self deny: ('hello' asText addAttribute: TextColor yellow) isPlainText. + self assert: ('hello' asText addAttribute: TextAlignment centered) isPlainText. + + self assert: ('hello' asText addAttribute: TextColor yellow) asString asText isPlainText.!
packages@lists.squeakfoundation.org