Skip to content

bugzilla
bugzilla
Commit 7a3c2eb8 authored by lpsolit%gmail.com's avatar lpsolit%gmail.com
Browse files
Options

Bug 95799: sanitycheck.cgi should do email checks using…

Bug 95799: sanitycheck.cgi should do email checks using Util::validate_email_syntax() - Patch by Frédéric Buclin <LpSolit@gmail.com> r=wicked a=justdave
parent 3b2f0ca8
Show whitespace changes
Inline Side-by-side
Showing with 3 additions and 4 deletions
sanitycheck.cgi
View file @ 7a3c2eb8
...@@ -29,6 +29,7 @@ use lib qw(.); ...@@ -29,6 +29,7 @@ use lib qw(.);
require "globals.pl"; require "globals.pl";
use Bugzilla::Constants; use Bugzilla::Constants;
use Bugzilla::Util;
use Bugzilla::User; use Bugzilla::User;
########################################################################### ###########################################################################
...@@ -500,13 +501,11 @@ DoubleCrossCheck("milestones", "product_id", "value", ...@@ -500,13 +501,11 @@ DoubleCrossCheck("milestones", "product_id", "value",
Status("Checking profile logins"); Status("Checking profile logins");
my $emailregexp = Param("emailregexp");
SendSQL("SELECT userid, login_name FROM profiles"); SendSQL("SELECT userid, login_name FROM profiles");
while (my ($id,$email) = (FetchSQLData())) { while (my ($id,$email) = (FetchSQLData())) {
unless ($email =~ m/$emailregexp/) { validate_email_syntax($email)
Alert "Bad profile email address, id=$id, &lt;$email&gt;." || Alert "Bad profile email address, id=$id, &lt;$email&gt;.";
}
} }
########################################################################### ###########################################################################
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment