Author: adam-guest
Date: 2008-04-23 05:20:08 +0000 (Wed, 23 Apr 2008)
New Revision: 1377
Modified:
trunk/scripts/debchange.pl
Log:
Further improve --close handling of packages with no open bugs - if there are
no open bugs, they can't belong to the current package
Modified: trunk/scripts/debchange.pl
===================================================================
--- trunk/scripts/debchange.pl 2008-04-22 22:49:35 UTC (rev 1376)
+++ trunk/scripts/debchange.pl 2008-04-23 05:20:08 UTC (rev 1377)
@@ -728,14 +728,10 @@
my $statuses = Devscripts::Debbugs::status(
map {[bug => $_, indicatesource => 1]} @{$bugs} );
if ($statuses eq "") {
- warn "$progname warning: No bugs found for package $PACKAGE\n";
- $opt_query=0;
- $warnings++;
- # This will now go and execute the "if (@closes and ! $opt_query)"
code
+ warn "$progname: No bugs found for package $PACKAGE\n";
}
foreach my $close (@closes) {
- last unless $opt_query;
- if (exists $statuses->{$close}) {
+ if ($statuses and exists $statuses->{$close}) {
my $title = $statuses->{$close}->{subject};
my $pkg = $statuses->{$close}->{package};
$title =~ s/^($pkg|$PACKAGE): //;
--
To unsubscribe, send mail to [EMAIL PROTECTED]