diff options
author | Jonathan "Duke" Leto <jonathan@leto.net> | 2011-01-12 11:40:22 -0800 |
---|---|---|
committer | Jonathan "Duke" Leto <jonathan@leto.net> | 2011-01-12 11:40:22 -0800 |
commit | ebc5a1d5adff8d041295b78a429a29ffb6b42d58 (patch) | |
tree | 8a7dcbe2ce9250b2bd67a7c6d4a18c1c25bd04fa /t | |
parent | More tests for jitterbug::Emailer (diff) | |
download | jitterbug-ebc5a1d5adff8d041295b78a429a29ffb6b42d58.tar.gz |
More jitterbug::Emailer tests
Diffstat (limited to '')
-rw-r--r-- | t/006_emailer.t | 8 |
1 files changed, 6 insertions, 2 deletions
diff --git a/t/006_emailer.t b/t/006_emailer.t index 0dce025..feffd38 100644 --- a/t/006_emailer.t +++ b/t/006_emailer.t @@ -1,6 +1,6 @@ use strict; use warnings; -use Test::Most tests => 5; +use Test::Most tests => 8; use Data::Dumper; use Test::MockObject; @@ -10,7 +10,7 @@ use_ok "jitterbug::Emailer"; my $buildconf = { on_failure_from_email => 'bob@example.com', on_failure_cc_email => 'steve@apple.com', - on_failure_subject_prefix => 'BLARG', + on_failure_subject_prefix => 'BLARG ', }; my $conf = { jitterbug => { build_process => $buildconf } }; @@ -39,4 +39,8 @@ use_ok "jitterbug::Emailer"; my $header = $email->{'header'}; isa_ok($header, 'Email::MIME::Header'); + is($header->header_raw('cc'), 'steve@apple.com', 'cc header'); + is($header->header_raw('subject'), 'BLARG ponie @ c0decafe', 'subject header'); + is($header->header_raw('from'), 'bob@example.com', 'from header'); + } |