diff options
| author | terry%mozilla.org <> | 2000-01-23 07:19:05 +0100 |
|---|---|---|
| committer | terry%mozilla.org <> | 2000-01-23 07:19:05 +0100 |
| commit | c2491654291209345784c141700bad79603fe07b (patch) | |
| tree | 27768abdbc698b7519a6a57734d3bb64ee2b47b7 /sanitycheck.cgi | |
| parent | 7ded9ccf820d22ad4d5141cb2fd2d6a2e5878dab (diff) | |
| download | bugzilla-c2491654291209345784c141700bad79603fe07b.tar.gz bugzilla-c2491654291209345784c141700bad79603fe07b.tar.xz | |
Honor the emailregexp param when checking email addresses.
Diffstat (limited to 'sanitycheck.cgi')
| -rwxr-xr-x | sanitycheck.cgi | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/sanitycheck.cgi b/sanitycheck.cgi index b67dad69e..953a90a7d 100755 --- a/sanitycheck.cgi +++ b/sanitycheck.cgi @@ -160,9 +160,11 @@ SendSQL("select userid,login_name from profiles"); my %profid; +my $emailregexp = Param("emailregexp"); + while (@row = FetchSQLData()) { my ($id, $email) = (@row); - if ($email =~ /^[^@, ]*@[^@, ]*\.[^@, ]*$/) { + if ($email =~ /$emailregexp/o) { $profid{$id} = 1; } else { Alert "Bad profile id $id <$email>." |