summaryrefslogtreecommitdiff
path: root/lib
diff options
context:
space:
mode:
Diffstat (limited to 'lib')
-rw-r--r--lib/jitterbug/Emailer.pm11
1 files changed, 8 insertions, 3 deletions
diff --git a/lib/jitterbug/Emailer.pm b/lib/jitterbug/Emailer.pm
index 60837d6..7a8ed9e 100644
--- a/lib/jitterbug/Emailer.pm
+++ b/lib/jitterbug/Emailer.pm
@@ -22,13 +22,11 @@ sub _make_body {
no warnings 'uninitialized';
return <<BODY;
$header
-
Commit Message:
$message
TAP Output:
$tap
-
$footer
BODY
@@ -47,10 +45,17 @@ sub run {
my $header = $buildconf->{'on_failure_header'};
my $footer = $buildconf->{'on_failure_footer'};
my $body = _make_body($header,$message, $tap, $footer);
+ my $summary;
- # Expand placeholders in our on_failure header and footer
+ if ( $tap =~ m/^(Test Summary Report.*)/ms ) {
+ $summary = $1;
+ }
+
+ # Expand placeholders in our failure email
$body =~ s/%%PROJECT%%/$project/g;
$body =~ s/%%SHA1%%/$sha1/g;
+ $body =~ s/%%SUMMARY%%/$summary/g;
+
my $stuff = Email::Stuff->from($buildconf->{'on_failure_from_email'})
# bug in Email::Stuff brakes chaining if $email is empty