From f0e80b41cd3f467555ee5d1bd59d04059c6a5d80 Mon Sep 17 00:00:00 2001 From: Don Armstrong Date: Mon, 3 Aug 2009 11:12:29 -0500 Subject: [PATCH] indicate which bug was blocked in set_blocks --- Debbugs/Control.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/Debbugs/Control.pm b/Debbugs/Control.pm index ac0e0e3..92e8c28 100644 --- a/Debbugs/Control.pm +++ b/Debbugs/Control.pm @@ -436,8 +436,8 @@ sub set_blocks { print {$transcript} "Was blocked by: $data->{blockedby}\n"; } my @changed; - push @changed, 'added blocking bug(s) '.english_join([keys %added_blockers]) if keys %added_blockers; - push @changed, 'removed blocking bug(s) '.english_join([keys %removed_blockers]) if keys %removed_blockers; + push @changed, 'added blocking bug(s) of '.$data->{bug_num}.': '.english_join([keys %added_blockers]) if keys %added_blockers; + push @changed, 'removed blocking bug(s) of '$data->{bug_num}.': '.english_join([keys %removed_blockers]) if keys %removed_blockers; $action = ucfirst(join ('; ',@changed)) if @changed; if (not @changed) { print {$transcript} "Ignoring request to alter tags of bug #$data->{bug_num} to the same tags previously set\n" -- 2.39.2