|
Lines 47-57
subtest 'transport() tests' => sub {
Link Here
|
| 47 |
is( ref($transport), 'Email::Sender::Transport::SMTP', 'Type is correct' ); |
47 |
is( ref($transport), 'Email::Sender::Transport::SMTP', 'Type is correct' ); |
| 48 |
is( $transport->ssl, 0, 'SSL is not set' ); |
48 |
is( $transport->ssl, 0, 'SSL is not set' ); |
| 49 |
|
49 |
|
| 50 |
$server->set({ ssl_mode => 'ssl' })->store; |
50 |
$server->set({ ssl_mode => '1' })->store; |
| 51 |
$transport = $server->transport; |
51 |
$transport = $server->transport; |
| 52 |
|
52 |
|
| 53 |
is( ref($transport), 'Email::Sender::Transport::SMTP', 'Type is correct' ); |
53 |
is( ref($transport), 'Email::Sender::Transport::SMTP', 'Type is correct' ); |
| 54 |
is( $transport->ssl, 'ssl', 'SSL is set' ); |
54 |
is( $transport->ssl, '1', 'SSL is set' ); |
| 55 |
|
55 |
|
| 56 |
$schema->storage->txn_rollback; |
56 |
$schema->storage->txn_rollback; |
| 57 |
}; |
57 |
}; |
| 58 |
- |
|
|