From 217f5356951cdccc79f26b11dc9aa0cdce4d080f Mon Sep 17 00:00:00 2001 From: Don Armstrong Date: Sat, 2 Jan 2010 15:37:03 -0800 Subject: [PATCH] * properly interpolate array'd fields when a limit fails (closes: #563413) --- Debbugs/Control.pm | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/Debbugs/Control.pm b/Debbugs/Control.pm index f79c5837..5a2a849c 100644 --- a/Debbugs/Control.pm +++ b/Debbugs/Control.pm @@ -2829,7 +2829,8 @@ LIMIT: for my $limit (make_list($param{limit}{$field})) { } if (not $match) { $going_to_fail = 1; - print {$transcript} "$field: '$data->{$field}' does not match at least one of ". + print {$transcript} "$field: '".join(', ',make_list($data->{$field})). + "' does not match at least one of ". join(', ',map {ref($_)?'(regex)':$_} make_list($param{limit}{$field}))."\n"; } } -- 2.39.5