handle missing closing bracket, remove blanks around email (filter_var balks)

1 files changed, 2 insertions, 2 deletions

diff --git a/test/it_mail.t b/test/it_mail.t
index 8b9a316..7e892c2 100755
--- a/test/it_mail.t
+++ b/test/it_mail.t
@@ -95,10 +95,10 @@ is(
 );
 
 is(
-	it_mail::address_error('neuman@example.com, <neuman@example.com>, "Neuman, Alfred E." <neuman@example.com>, aneuman'),
+	it_mail::address_error('neuman@example.com, <neuman@example.com>, "Neuman, Alfred E." <neuman@example.com>, aneuman, "<neuman@example>" <neuman@example.com>', " neumann@example.com"),
 	null,
 	"Accept valid e-mail addresses"
 );
 
-foreach (['neuman@example', '"neuman@example.com" <neuman@example>'] as $email)
+foreach (['neuman@example', '"neuman@example.com" <neuman@example>', '<neuma@example.com'] as $email)
 	isnt(it_mail::address_error($email), null, "Reject invalid e-mail address $email");