diff options
-rw-r--r-- | CGI.pl | 2 | ||||
-rwxr-xr-x | processmail | 8 |
2 files changed, 5 insertions, 5 deletions
@@ -118,7 +118,7 @@ sub ParseUrlString { $isnull{$name} = 1; } } - if (defined %isnull) { + if (%isnull) { foreach my $name (keys(%isnull)) { if (!defined $f->{$name}) { $f->{$name} = ""; 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); |