Koha-community/Koha
13
7
Fork 0
Code Issues Releases Wiki Activity

Bug 28870: Regression tests

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

Signed-off-by: Nick Clemens <nick@bywatersolutions.com>

Signed-off-by: Jonathan Druart <jonathan.druart@bugs.koha-community.org>
This commit is contained in:
Tomás Cohen Arazi 2021-08-20 18:22:58 -03:00 committed by Jonathan Druart
parent 870e3e8e16
commit 33994650f0
1 changed files with 4 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

8
t/Koha/Email.t
View file

@ -37,8 +37,8 @@ subtest 'create() tests' => sub {
my $email = Koha::Email->create(
{
from => 'from@example.com',
to => 'to@example.com',
from => 'Fróm <from@example.com>',
to => 'Tö <to@example.com>',
cc => 'cc@example.com',
bcc => 'bcc@example.com',
reply_to => 'reply_to@example.com',
@ -49,8 +49,8 @@ subtest 'create() tests' => sub {
}
);
is( $email->email->header('From'), 'from@example.com', 'Value set correctly' );
is( $email->email->header('To'), 'to@example.com', 'Value set correctly' );
is( $email->email->header('From'), 'Fróm <from@example.com>', 'Value set correctly' );
is( $email->email->header('To'), 'Tö <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('Reply-To'), 'reply_to@example.com', 'Value set correctly' );