diff options
| author | Mandrake <mandrake@mandriva.com> | 2006-10-26 11:07:07 +0000 |
|---|---|---|
| committer | Mandrake <mandrake@mandriva.com> | 2006-10-26 11:07:07 +0000 |
| commit | a5b0ba36b1b47889f9706da0f11b8458aac51c6a (patch) | |
| tree | 93f1ded593de42546b694d4d3865f9d8839cf99b | |
| parent | becd3cb20324e8c17931b2418cd37bdf63b3cba4 (diff) | |
| download | mga-youri-submit-a5b0ba36b1b47889f9706da0f11b8458aac51c6a.tar mga-youri-submit-a5b0ba36b1b47889f9706da0f11b8458aac51c6a.tar.gz mga-youri-submit-a5b0ba36b1b47889f9706da0f11b8458aac51c6a.tar.bz2 mga-youri-submit-a5b0ba36b1b47889f9706da0f11b8458aac51c6a.tar.xz mga-youri-submit-a5b0ba36b1b47889f9706da0f11b8458aac51c6a.zip | |
$last_change is sometime empty
| -rw-r--r-- | lib/Youri/Submit/Reject/Mail.pm | 7 |
1 files changed, 3 insertions, 4 deletions
diff --git a/lib/Youri/Submit/Reject/Mail.pm b/lib/Youri/Submit/Reject/Mail.pm index 0fcb6db..17f883d 100644 --- a/lib/Youri/Submit/Reject/Mail.pm +++ b/lib/Youri/Submit/Reject/Mail.pm @@ -65,13 +65,12 @@ sub run { $package->get_revision_name(); my $information = $package->get_information(); my $last_change = $package->get_last_change(); + 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" . $information . "\n" . - $last_change->[Youri::Package::CHANGE_AUTHOR] . ":\n" . - join( - '', map { "- $_\n" } @{$last_change->[Youri::Package::CHANGE_TEXT]} - ); + $author . ":\n$list"; # ensure proper codeset conversion # for informations coming from package |