Lines 50-60
my $letter = C4::Letters::GetPreparedLetter(
Link Here
|
50 |
); |
50 |
); |
51 |
|
51 |
|
52 |
|
52 |
|
53 |
t::lib::Mocks::mock_preference( 'AutoEmailPrimaryAddress', 'OFF' ); |
53 |
t::lib::Mocks::mock_preference( 'EmailFieldPrimary', 'OFF' ); |
54 |
C4::Message->enqueue($letter, $patron, 'email'); |
54 |
C4::Message->enqueue($letter, $patron, 'email'); |
55 |
my $message = C4::Message->find_last_message($patron->unblessed, 'TEST_MESSAGE', 'email'); |
55 |
my $message = C4::Message->find_last_message($patron->unblessed, 'TEST_MESSAGE', 'email'); |
56 |
like( $message->{metadata}, qr{heÄllo} ); |
56 |
like( $message->{metadata}, qr{heÄllo} ); |
57 |
is ($message->{to_address}, $patron->email, "To address set correctly for AutoEmailPrimaryAddress 'off'"); |
57 |
is ($message->{to_address}, $patron->email, "To address set correctly for EmailFieldPrimary 'off'"); |
58 |
|
58 |
|
59 |
$letter = C4::Letters::GetPreparedLetter( |
59 |
$letter = C4::Letters::GetPreparedLetter( |
60 |
( |
60 |
( |
Lines 69-75
$message->append($letter);
Link Here
|
69 |
like( $message->{metadata}, qr{heÄllo} ); |
69 |
like( $message->{metadata}, qr{heÄllo} ); |
70 |
like( $message->{metadata}, qr{hell❤️} ); |
70 |
like( $message->{metadata}, qr{hell❤️} ); |
71 |
|
71 |
|
72 |
t::lib::Mocks::mock_preference( 'AutoEmailPrimaryAddress', 'emailpro' ); |
72 |
t::lib::Mocks::mock_preference( 'EmailFieldPrimary', 'emailpro' ); |
73 |
C4::Message->enqueue($letter, $patron, 'email'); |
73 |
C4::Message->enqueue($letter, $patron, 'email'); |
74 |
$message = C4::Message->find_last_message($patron->unblessed, 'TEST_MESSAGE', 'email'); |
74 |
$message = C4::Message->find_last_message($patron->unblessed, 'TEST_MESSAGE', 'email'); |
75 |
is ($patron->notice_email_address, $patron->emailpro, "To address set correctly for AutoEmailPrimaryAddress 'emailpro'"); |
75 |
is ($patron->notice_email_address, $patron->emailpro, "To address set correctly for EmailFieldPrimary 'emailpro'"); |
76 |
- |
|
|