From fa60737d43b37923c8c0235d5f9a7aa0fcb29179 Mon Sep 17 00:00:00 2001 From: Olivier Blin Date: Fri, 9 Feb 2007 18:50:53 +0000 Subject: fix reject mail --- lib/Youri/Submit/Reject/Mail.pm | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/lib/Youri/Submit/Reject/Mail.pm b/lib/Youri/Submit/Reject/Mail.pm index fe4971d..cee5a19 100644 --- a/lib/Youri/Submit/Reject/Mail.pm +++ b/lib/Youri/Submit/Reject/Mail.pm @@ -68,7 +68,9 @@ sub run { my $author = $last_change->[Youri::Package::CHANGE_AUTHOR] if $last_change; my $list = map { "- $_\n" } @{$last_change->[Youri::Package::CHANGE_TEXT]} if $last_change; my $content = - "Errors: \n\n" . join("\n- ", @$errors) . "\n\n" . + "Errors: \n\n" . join("\n", map { + ( "* $_", (map { " - $_" } @{$errors->{$_}}), "\n"); + } sort(keys %$errors)) . "\n" . $information . "\n" . $author . ":\n$list"; -- cgit v1.2.1