diff options
Diffstat (limited to 't/tests/sietima')
-rw-r--r-- | t/tests/sietima/role/nospoof.t | 25 |
1 files changed, 25 insertions, 0 deletions
diff --git a/t/tests/sietima/role/nospoof.t b/t/tests/sietima/role/nospoof.t new file mode 100644 index 0000000..6f30635 --- /dev/null +++ b/t/tests/sietima/role/nospoof.t @@ -0,0 +1,25 @@ +#!perl +use lib 't/lib'; +use Test::Sietima; + +my $s = make_sietima( + with_traits => ['NoSpoof'], + subscribers => [ + 'one@users.example.com', + 'two@users.example.com', + ], +); + +test_sending( + sietima => $s, + mail => { + from => 'a user <one@users.example.com>', + }, + mails => [ + object { + call [ header_str => 'from' ] => '"a user" <'.$s->return_path->address.'>'; + }, + ], +); + +done_testing; |