Raphael Geissert <atomo64+deb...@gmail.com> writes: > --- a/lib/Lintian/Command.pm > +++ b/lib/Lintian/Command.pm > @@ -303,7 +303,7 @@ all the executions of kill_kill. > =cut > > sub kill { > - my $status; > + my $status = 0; > while (my $opts = shift @_) { > $status |= kill_kill($opts->{'harness'}, grace => 2); > }
Also, ||= is more correct, although if the return value of kill_kill is always either 1 or 0, it won't matter in this case. (But |= is almost always wrong in Perl unless you're actually manipulating bitmasks.) -- Russ Allbery (r...@debian.org) <http://www.eyrie.org/~eagle/> -- To UNSUBSCRIBE, email to debian-bugs-dist-requ...@lists.debian.org with a subject of "unsubscribe". Trouble? Contact listmas...@lists.debian.org