diff options
| author | Olivier Blin <oblin@mandriva.com> | 2007-02-09 18:50:53 +0000 |
|---|---|---|
| committer | Olivier Blin <oblin@mandriva.com> | 2007-02-09 18:50:53 +0000 |
| commit | fa60737d43b37923c8c0235d5f9a7aa0fcb29179 (patch) | |
| tree | 0d58a3e53e6c3d249f6ec91d64a3603d14b5f6bf | |
| parent | 54b231921c05c68d2f7a3800158822d5198c5a30 (diff) | |
| download | mga-youri-submit-fa60737d43b37923c8c0235d5f9a7aa0fcb29179.tar mga-youri-submit-fa60737d43b37923c8c0235d5f9a7aa0fcb29179.tar.gz mga-youri-submit-fa60737d43b37923c8c0235d5f9a7aa0fcb29179.tar.bz2 mga-youri-submit-fa60737d43b37923c8c0235d5f9a7aa0fcb29179.tar.xz mga-youri-submit-fa60737d43b37923c8c0235d5f9a7aa0fcb29179.zip | |
fix reject mail
| -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"; |