equal
deleted
inserted
replaced
|
1 use Test::More; |
|
2 use Test::MTA::Exim4; |
|
3 use Data::Dumper; |
|
4 |
|
5 |
|
6 my @TESTS = ( |
|
7 [ |
|
8 'hans@foo.de' => { |
|
9 transport => 'remote_smtp_submission', |
|
10 router => 'smart_smtp', |
|
11 } |
|
12 ], |
|
13 [ |
|
14 'heiko@localhost' => { |
|
15 transport => 'local_delivery', |
|
16 router => 'localuser', |
|
17 }, |
|
18 ], |
|
19 ); |
|
20 |
|
21 |
|
22 my $exim = Test::MTA::Exim4->new; |
|
23 #diag Dumper $exim->_run_exim_bt('hans@localhost'); |
|
24 |
|
25 cmp_ok $exim->exim_version, '>=', 4 => 'Version ok'; |
|
26 $exim->config_ok; |
|
27 |
|
28 |
|
29 $exim->routes_as_ok(@$_) foreach @TESTS; |
|
30 |
|
31 done_testing; |