fix for bug #44622: perl5.6 vs perl5.005 -w: more anal 5.6 causes errors.
patches by mtakacs@pacbell.net. git-svn-id: svn://10.0.0.236/trunk@76788 18797224-902f-48f8-a5cc-f745e15eee43
This commit is contained in:
@@ -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);
|
||||
|
||||
Reference in New Issue
Block a user