diff options
Diffstat (limited to 't/tests/sietima/role/subscriberonly/moderate.t')
-rw-r--r-- | t/tests/sietima/role/subscriberonly/moderate.t | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/t/tests/sietima/role/subscriberonly/moderate.t b/t/tests/sietima/role/subscriberonly/moderate.t index be996e3..c4e3005 100644 --- a/t/tests/sietima/role/subscriberonly/moderate.t +++ b/t/tests/sietima/role/subscriberonly/moderate.t @@ -30,12 +30,15 @@ subtest 'from subscriber' => sub { }; sub test_from_non_sub() { + my $from = $s->return_path->address; test_sending( sietima => $s, mail => { from=>'someone@users.example.com' }, mails => [{ o => object { call [header_str => 'subject'] => match qr{\bheld for moderation\b}; + call [header_str => 'from'] => match qr{\b\Q$from\E\b}; + call [header_str => 'to'] => match qr{\b\Q$admin\E\b}; call_list parts => [ object { call body => match qr{Use id \S+ to refer to it}; @@ -47,6 +50,7 @@ sub test_from_non_sub() { }, ]; }, + from => $from, to => [$admin], }], ); |