From 14f7d80b0cd0adfa02ae77d30111fe6daca53456 Mon Sep 17 00:00:00 2001 From: Don Armstrong Date: Mon, 3 Aug 2009 11:14:36 -0500 Subject: [PATCH] add missing concatenation operator --- Debbugs/Control.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/Debbugs/Control.pm b/Debbugs/Control.pm index 92e8c28d..a36321a4 100644 --- a/Debbugs/Control.pm +++ b/Debbugs/Control.pm @@ -437,7 +437,7 @@ sub set_blocks { } my @changed; 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; + 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.5