diff options
author | cyeh%bluemartini.com <> | 2000-08-22 02:50:41 +0000 |
---|---|---|
committer | cyeh%bluemartini.com <> | 2000-08-22 02:50:41 +0000 |
commit | e8b93c7c68c4b56cdc10249ba3740a504f30e2ee (patch) | |
tree | 255dc20e2b66d93674fb7839e75049709b6e88d4 /processmail | |
parent | 2cd9592d7760d10b8840e155380b5dc4d2b62ff0 (diff) | |
download | bugs-e8b93c7c68c4b56cdc10249ba3740a504f30e2ee.tar bugs-e8b93c7c68c4b56cdc10249ba3740a504f30e2ee.tar.gz bugs-e8b93c7c68c4b56cdc10249ba3740a504f30e2ee.tar.bz2 bugs-e8b93c7c68c4b56cdc10249ba3740a504f30e2ee.tar.xz bugs-e8b93c7c68c4b56cdc10249ba3740a504f30e2ee.zip |
fix for bug #44622: perl5.6 vs perl5.005 -w: more anal 5.6 causes errors.
patches by mtakacs@pacbell.net.
Diffstat (limited to 'processmail')
-rwxr-xr-x | processmail | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/processmail b/processmail index 5431fda11..9019287fe 100755 --- a/processmail +++ b/processmail @@ -471,9 +471,9 @@ sub NewProcessOneBug { for my $person (@personlist) { $count++; - NewProcessOnePerson($person, $count, \@headerlist, \%values, - \%defmailhead, \%fielddescription, $difftext, - $newcomments, $start, $id, 1); + &NewProcessOnePerson($person, $count, \@headerlist, \%values, + \%defmailhead, \%fielddescription, $difftext, + $newcomments, $start, $id, 1); } SendSQL("UPDATE bugs SET lastdiffed = '$end', delta_ts = delta_ts " . @@ -510,7 +510,7 @@ sub NewProcessOnePerson ($$\@\%\%\%$$$$) { foreach my $watcher ( $watcherSet->toArray() ) { - NewProcessOnePerson(DBID_to_name($watcher), + &NewProcessOnePerson(DBID_to_name($watcher), $count, \@headerlist, \%values, \%defmailhead, \%fielddescription, $difftext, $newcomments, $start, $id, 0); |