summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorcyeh%bluemartini.com <>2000-09-16 07:39:35 +0200
committercyeh%bluemartini.com <>2000-09-16 07:39:35 +0200
commitc5d3b08e6fa816cd5d7d11e41ed26cb88d8a1d68 (patch)
tree4d62231a5d3e081e3ac5b8de8a9718cb001b75f3
parentee4d32501ab47578743ac075f37733dcd4b0eb31 (diff)
downloadbugzilla-c5d3b08e6fa816cd5d7d11e41ed26cb88d8a1d68.tar.gz
bugzilla-c5d3b08e6fa816cd5d7d11e41ed26cb88d8a1d68.tar.xz
fix for 41303: new email tech doesn't work with emailregexp
patch by JRobertson@medevolve.com (Jon Robertson)
-rwxr-xr-xprocessmail7
1 files changed, 6 insertions, 1 deletions
diff --git a/processmail b/processmail
index 2e45e30ae..1dca2ec11 100755
--- a/processmail
+++ b/processmail
@@ -471,6 +471,11 @@ sub NewProcessOneBug {
for my $person (@personlist) {
$count++;
+ my $match = "^[^@, ]*@[^@, ]*\.[^@, ]*\$";
+ if ($person !~ /$match/) {
+ $person = $person . Param('emailsuffix');
+ }
+
&NewProcessOnePerson($person, $count, \@headerlist, \%values,
\%defmailhead, \%fielddescription, $difftext,
$newcomments, $start, $id, 1);
@@ -510,7 +515,7 @@ sub NewProcessOnePerson ($$\@\%\%\%$$$$) {
foreach my $watcher ( $watcherSet->toArray() ) {
- &NewProcessOnePerson(DBID_to_name($watcher),
+ &NewProcessOnePerson(DBID_to_name($watcher) . Param('emailsuffix'),
$count, \@headerlist, \%values,
\%defmailhead, \%fielddescription, $difftext,
$newcomments, $start, $id, 0);