From: Don Armstrong <don@donarmstrong.com>
Date: Sun, 28 Sep 2014 00:01:24 +0000 (-0700)
Subject: Make queued complain less when removing files
X-Git-Url: https://git.decadent.org.uk/gitweb/?a=commitdiff_plain;h=0d08ba79a0d99c1912870ec7491ecc8ac34e7560;p=dak.git

Make queued complain less when removing files

Reset @files each time through the command loop to avoid adding
previously deleted files to the output message.

Bug: https://bugs.debian.org/594803
Signed-off-by: Ansgar Burchardt <ansgar@debian.org>
---

diff --git a/tools/debianqueued-0.9/debianqueued b/tools/debianqueued-0.9/debianqueued
index 46ce787f..5702e5c5 100755
--- a/tools/debianqueued-0.9/debianqueued
+++ b/tools/debianqueued-0.9/debianqueued
@@ -1097,7 +1097,7 @@ sub process_commands($) {
   my $commands = shift;
   my ( @cmds, $cmd, $pgplines, $signator );
   local (*COMMANDS);
-  my ( @files, $file, @removed, $target_delay );
+  my ($file, @removed, $target_delay );
 
   format_status_str( $main::current_changes, $commands );
   $main::dstat = "c";
@@ -1190,6 +1190,7 @@ outer_loop: while (<COMMANDS>) {
     next if @word < 1;
 
     if ( $word[0] eq "rm" ) {
+      my @files = ();
       foreach ( @word[ 1 .. $#word ] ) {
         my $origword = $_;
         if (m,^DELAYED/([0-9]+)-day/,) {