Browse Source

Bug 28023: Regression tests

Signed-off-by: Tomas Cohen Arazi <tomascohen@theke.io>
Signed-off-by: Martin Renvoize <martin.renvoize@ptfs-europe.com>

Signed-off-by: Jonathan Druart <jonathan.druart@bugs.koha-community.org>
21.05.x
Tomás Cohen Arazi 2 years ago
committed by Jonathan Druart
parent
commit
ad55a2b4d8
  1. 4
      t/Koha/Email.t

4
t/Koha/Email.t

@ -53,7 +53,7 @@ subtest 'create() tests' => sub {
is( $email->email->header('To'), 'to@example.com', 'Value set correctly' );
is( $email->email->header('Cc'), 'cc@example.com', 'Value set correctly' );
is( $email->email->header('Bcc'), 'bcc@example.com', 'Value set correctly' );
is( $email->email->header('ReplyTo'), 'reply_to@example.com', 'Value set correctly' );
is( $email->email->header('Reply-To'), 'reply_to@example.com', 'Value set correctly' );
is( $email->email->header('Sender'), 'sender@example.com', 'Value set correctly' );
is( $email->email->header('Subject'), 'Some subject', 'Value set correctly' );
is( $email->email->header('X-Mailer'), 'Koha', 'Value set correctly' );
@ -80,7 +80,7 @@ subtest 'create() tests' => sub {
is( $email->email->header('To'), 'catchall@example.com', 'SendAllEmailsTo overloads any address' );
is( $email->email->header('Cc'), undef, 'SendAllEmailsTo overloads any address' );
is( $email->email->header('Bcc'), undef, 'SendAllEmailsTo overloads any address' );
is( $email->email->header('ReplyTo'), 'replytodefault@example.com', 'ReplytoDefault picked when replyto not passed' );
is( $email->email->header('Reply-To'), 'replytodefault@example.com', 'ReplytoDefault picked when replyto not passed' );
is( $email->email->header('Sender'), 'returnpathdefault@example.com', 'ReturnpathDefault picked when sender not passed' );
is( $email->email->header('Subject'), '', 'No subject passed, empty string' );
is( $email->email->body, $text_body, "Body set correctly" );

Loading…
Cancel
Save