Lines 226-236
subtest 'send_or_die() tests' => sub {
Link Here
|
226 |
'If explicitly passed, "to" is preserved' ); |
226 |
'If explicitly passed, "to" is preserved' ); |
227 |
|
227 |
|
228 |
$THE_email->send_or_die( { transport => $transport } ); |
228 |
$THE_email->send_or_die( { transport => $transport } ); |
|
|
229 |
my @to = sort @{ $args->{to} }; |
229 |
is_deeply( |
230 |
is_deeply( |
230 |
$args->{to}, |
231 |
[@to], |
231 |
[ |
232 |
[ |
232 |
'to@example.com', 'cc@example.com', |
233 |
'bcc_1@example.com', 'bcc_2@example.com', |
233 |
'bcc_1@example.com', 'bcc_2@example.com' |
234 |
'cc@example.com', 'to@example.com', |
234 |
], |
235 |
], |
235 |
'If "to" is not explicitly passed, extract recipients from headers' |
236 |
'If "to" is not explicitly passed, extract recipients from headers' |
236 |
); |
237 |
); |
237 |
- |
|
|