From c6162c5faf2f6067bda9d4e365a0fc02d29152e4 Mon Sep 17 00:00:00 2001
From: Tomas Cohen Arazi <tomascohen@theke.io>
Date: Mon, 22 Mar 2021 14:47:11 -0300
Subject: [PATCH] Bug 28017: Regression tests

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