blob: 6f30635414c87e88ddf5835c477977e6c0ce5d14 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
|
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;
|