|
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 |
- |
|
|