about summary refs log tree commit diff
path: root/lib/jitterbug/Emailer.pm
diff options
context:
space:
mode:
Diffstat (limited to 'lib/jitterbug/Emailer.pm')
-rw-r--r--lib/jitterbug/Emailer.pm8
1 files changed, 7 insertions, 1 deletions
diff --git a/lib/jitterbug/Emailer.pm b/lib/jitterbug/Emailer.pm
index 2af7590..3c40bfd 100644
--- a/lib/jitterbug/Emailer.pm
+++ b/lib/jitterbug/Emailer.pm
@@ -23,14 +23,20 @@ sub run {
     my $project    = $task->project->name;
     my $tap_output = $self->{'tap_output'};
     my $sha1       = $task->commit->sha256;
+    my $shortsha1  = substr($sha1, 0, 8);
     my $desc       = JSON::decode_json( $task->commit->content );
     my $email      = $desc->{'author'}{'email'};
+    my $message    = $desc->{'message'};
     my $header     = $buildconf->{'on_failure_header'};
     my $footer     = $buildconf->{'on_failure_footer'};
 
     my $body = <<BODY;
 $header
 
+Commit Message:
+$message
+
+TAP Output:
 $tap_output
 
 $footer
@@ -42,7 +48,7 @@ BODY
                 ->cc($buildconf->{'on_failure_cc_email'})
                 ->text_body($body)
                 ->subject(
-                    $buildconf->{'on_failure_subject_prefix'} . "$project @ $sha1"
+                    $buildconf->{'on_failure_subject_prefix'} . "$project @ $shortsha1 $message"
                   );
                 # Should we attach a build log for convenience?
                 # ->attach(io('dead_bunbun_faked.gif')->all,