From c6162c5faf2f6067bda9d4e365a0fc02d29152e4 Mon Sep 17 00:00:00 2001 From: Tomas Cohen Arazi Date: Mon, 22 Mar 2021 14:47:11 -0300 Subject: [PATCH] Bug 28017: Regression tests Signed-off-by: Tomas Cohen Arazi Signed-off-by: Martin Renvoize --- t/Koha/Email.t | 12 +++++++++++- 1 file changed, 11 insertions(+), 1 deletion(-) diff --git a/t/Koha/Email.t b/t/Koha/Email.t index 1c46fcc284..bfd75929d2 100755 --- a/t/Koha/Email.t +++ b/t/Koha/Email.t @@ -26,7 +26,7 @@ use_ok('Koha::Email'); subtest 'create() tests' => sub { - plan tests => 23; + plan tests => 24; t::lib::Mocks::mock_preference( 'SendAllEmailsTo', undef ); @@ -60,6 +60,16 @@ subtest 'create() tests' => sub { like( $email->email->content_type, qr|charset="?iso-8859-1"?|, "Charset set correctly"); like( $email->email->header('Message-ID'), qr/\<.*@.*\>/, 'Value set correctly' ); + $email = Koha::Email->create( + { + from => 'from@example.com', + to => 'to@example.com', + bcc => 'root@localhost', + } + ); + + is( $email->email->header('Bcc'), 'root@localhost', 'Non-FQDN (@localhost) supported' ); + t::lib::Mocks::mock_preference( 'SendAllEmailsTo', 'catchall@example.com' ); t::lib::Mocks::mock_preference( 'ReplytoDefault', 'replytodefault@example.com' ); t::lib::Mocks::mock_preference( 'ReturnpathDefault', 'returnpathdefault@example.com' ); -- 2.20.1