aboutsummaryrefslogtreecommitdiffstats
path: root/lib/Youri/Submit
diff options
context:
space:
mode:
authorMandrake <mandrake@mandriva.com>2006-10-26 11:07:07 +0000
committerMandrake <mandrake@mandriva.com>2006-10-26 11:07:07 +0000
commita5b0ba36b1b47889f9706da0f11b8458aac51c6a (patch)
tree93f1ded593de42546b694d4d3865f9d8839cf99b /lib/Youri/Submit
parentbecd3cb20324e8c17931b2418cd37bdf63b3cba4 (diff)
downloadmga-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
Diffstat (limited to 'lib/Youri/Submit')
-rw-r--r--lib/Youri/Submit/Reject/Mail.pm7
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