[squeak-dev] The Trunk: NetworkTests-bp.42.mcz
commits at source.squeak.org
commits at source.squeak.org
Sun Jul 3 09:53:00 UTC 2016
Bernhard Pieber uploaded a new version of NetworkTests to project The Trunk:
http://source.squeak.org/trunk/NetworkTests-bp.42.mcz
==================== Summary ====================
Name: NetworkTests-bp.42
Author: bp
Time: 3 July 2016, 11:49:15.520702 am
UUID: cd20a935-7da4-42d5-ac67-a9c6a1ef847b
Ancestors: NetworkTests-eem.41
test for e-mail address with ampersand
=============== Diff against NetworkTests-eem.41 ===============
Item was changed:
----- Method: MailAddressParserTest>>testAddressesIn (in category 'tests') -----
testAddressesIn
| testString correctAnswer |
+ testString := 'joe at lama.com, joe2 at lama.com joe3 at lama.com joe4 , Not an Address <joe5 at address>, joe.(annoying (nested) comment)literal@[1.2.3.4], "an annoying" group : joe1 at groupie, joe2 at groupie, "Joey" joe3 at groupy, "joe6"."joe8"@group.com;, Lex''s email account <lex>, foo+bar at baz.com romeo&juliet at shakespeare.uk'.
- testString := 'joe at lama.com, joe2 at lama.com joe3 at lama.com joe4 , Not an Address <joe5 at address>, joe.(annoying (nested) comment)literal@[1.2.3.4], "an annoying" group : joe1 at groupie, joe2 at groupie, "Joey" joe3 at groupy, "joe6"."joe8"@group.com;, Lex''s email account <lex>, foo+bar at baz.com'.
+ correctAnswer := #('joe at lama.com' 'joe2 at lama.com' 'joe3 at lama.com' 'joe4' 'joe5 at address' 'joe.literal@[1.2.3.4]' 'joe1 at groupie' 'joe2 at groupie' '"Joey"' 'joe3 at groupy' '"joe6"."joe8"@group.com' 'lex' 'foo+bar at baz.com' 'romeo&juliet at shakespeare.uk') asOrderedCollection.
- correctAnswer := #('joe at lama.com' 'joe2 at lama.com' 'joe3 at lama.com' 'joe4' 'joe5 at address' 'joe.literal@[1.2.3.4]' 'joe1 at groupie' 'joe2 at groupie' '"Joey"' 'joe3 at groupy' '"joe6"."joe8"@group.com' 'lex' 'foo+bar at baz.com') asOrderedCollection.
self assert: ((MailAddressParser addressesIn: testString) = correctAnswer).!
More information about the Squeak-dev
mailing list
|