diff options
Diffstat (limited to 'lib')
| -rw-r--r-- | lib/Youri/Submit/Reject/Mail.pm | 4 |
1 files changed, 3 insertions, 1 deletions
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"; |