From 70bea40b946f701856d47e4cd9cca6f80b931020 Mon Sep 17 00:00:00 2001
From: Colin Kuskie <colink@perldreamer.com>
Date: Wed, 16 Aug 2006 23:20:25 +0000
Subject: [PATCH] update Form/Email test now that single character usernames
 work

---
 t/Form/Email.t | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/t/Form/Email.t b/t/Form/Email.t
index 3a8a799cb..ae5231018 100644
--- a/t/Form/Email.t
+++ b/t/Form/Email.t
@@ -38,7 +38,7 @@ my $testBlock = [
 	{
 		key => 'EMAIL2',
 		testValue => 'i@nowhere.com',
-		expected  => undef,
+		expected  => 'EQUAL',
 		comment   => 'single character email fails'
 	},
 	{