Control: tag -1 patch

The attached patch fixes #594803 (queued noisy when removing multiple
files.)

-- 
Don Armstrong                      http://www.donarmstrong.com

It was said that life was cheap in Ankh-Morpork. This was, of course,
completely wrong. Life was often very expensive; you could get death
for free.
 -- Terry Pratchet _Pyramids_ p25
From 5ff72213455efd17b2a228a8165851eaf8563324 Mon Sep 17 00:00:00 2001
From: Don Armstrong <d...@donarmstrong.com>
Date: Sat, 27 Sep 2014 17:01:24 -0700
Subject: [PATCH] Reset @files each time through the command loop to avoid
 adding previously deleted files to the output message. This resolves #594803
 (queue daemon noisy when removing multiple files).

---
 tools/debianqueued-0.9/debianqueued | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/tools/debianqueued-0.9/debianqueued b/tools/debianqueued-0.9/debianqueued
index 46ce787..5702e5c 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/,) {
-- 
2.1.0

Reply via email to