The Trunk: CollectionsTests-mt.259.mcz

Marcel Taeumel uploaded a new version of CollectionsTests to project The Trunk:
http://source.squeak.org/trunk/CollectionsTests-mt.259.mcz

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

Name: CollectionsTests-mt.259
Author: mt
Time: 12 November 2015, 10:08:13.946 am
UUID: a2346d8d-ec23-47dc-810e-680758375724
Ancestors: CollectionsTests-nice.258

Adds a test for text.

=============== Diff against CollectionsTests-nice.258 ===============

Item was added:
+ ----- Method: TextTest>>test01ColorAt (in category 'tests') -----
+ test01ColorAt
+
+ | text |
+ text := Text fromString: 'Hello'.
+ self assert: Color black equals: (text colorAt: 1).
+ self should: [text colorAt: 1 ifNone: [Error signal]] raise: Error.
+
+ text := Text string: 'Hello' attribute: (TextColor color: Color gray).
+ self assert: Color gray equals: (text colorAt: 1).
+ !