From d7a5dfa26abe21aa9216fe862225baa2b5caca3e Mon Sep 17 00:00:00 2001
From: alecpl <alec@alec.pl>
Date: Sat, 19 Jun 2010 18:04:48 +0000
Subject: - Fix dot-atom  expression in e-mail validation regexp (#1486808)

---
 program/include/main.inc | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'program')

diff --git a/program/include/main.inc b/program/include/main.inc
index 7c506d9e6..fff9652fa 100644
--- a/program/include/main.inc
+++ b/program/include/main.inc
@@ -1586,7 +1586,7 @@ function check_email($email, $dns_check=true)
   // from PEAR::Validate
   $regexp = '&^(?:
 	("\s*(?:[^"\f\n\r\t\v\b\s]+\s*)+")| 			 	#1 quoted name
-	([-\w!\#\$%\&\'*+~/^`|{}]+(?:\.[-\w!\#\$%\&\'*+~/^`|{}]+)*)) 	#2 OR dot-atom
+	([-\w!\#\$%\&\'*+~/^`|{}=]+(?:\.[-\w!\#\$%\&\'*+~/^`|{}=]+)*)) 	#2 OR dot-atom (RFC5322)
 	$&xi';
 
   if (!preg_match($regexp, $local_part))
-- 
cgit v1.2.3