From: Don Armstrong Date: Mon, 3 Aug 2009 16:12:29 +0000 (-0500) Subject: indicate which bug was blocked in set_blocks X-Git-Tag: release/2.6.0~456^2~11 X-Git-Url: https://git.donarmstrong.com/?p=debbugs.git;a=commitdiff_plain;h=f0e80b41cd3f467555ee5d1bd59d04059c6a5d80 indicate which bug was blocked in set_blocks --- 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"