From e656c6773a2b3014249b5cef67d4be8a4dba225b Mon Sep 17 00:00:00 2001 From: Colin Kuskie Date: Thu, 17 Apr 2008 21:03:01 +0000 Subject: [PATCH] add another email address for validation check --- t/Form/Email.t | 6 ++++++ 1 file changed, 6 insertions(+) diff --git a/t/Form/Email.t b/t/Form/Email.t index ab8bd9989..25d925346 100644 --- a/t/Form/Email.t +++ b/t/Form/Email.t @@ -43,6 +43,12 @@ my $testBlock = [ }, { key => 'EMAIL3', + testValue => 'web.gui@nowhere.org', + expected => 'EQUAL', + comment => 'dotted email address' + }, + { + key => 'EMAIL4', testValue => 'what do you want?', expected => undef, comment => 'not an email address'