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]

Reply via email to