diff options
author | dakkar <dakkar@thenautilus.net> | 2017-02-05 13:29:42 +0000 |
---|---|---|
committer | dakkar <dakkar@thenautilus.net> | 2017-02-05 13:29:42 +0000 |
commit | dcbf392ecd8e22ad4d3d326b83d89d749ca88481 (patch) | |
tree | c35b9a2f1b13c939dd7de7023a0650f45365170c /t | |
parent | POD for ::Types (diff) | |
download | Sietima-dcbf392ecd8e22ad4d3d326b83d89d749ca88481.tar.gz Sietima-dcbf392ecd8e22ad4d3d326b83d89d749ca88481.tar.bz2 Sietima-dcbf392ecd8e22ad4d3d326b83d89d749ca88481.zip |
::Subscriber 'raw_address' is now 'primary'
It was a horrible name. The coercion from hashref is also simplified
this way.
Diffstat (limited to 't')
-rw-r--r-- | t/tests/sietima/role/nomail.t | 4 | ||||
-rw-r--r-- | t/tests/sietima/role/replyto.t | 4 | ||||
-rw-r--r-- | t/tests/sietima/role/subscriberonly/drop.t | 2 | ||||
-rw-r--r-- | t/tests/sietima/subscriber.t | 4 |
4 files changed, 7 insertions, 7 deletions
diff --git a/t/tests/sietima/role/nomail.t b/t/tests/sietima/role/nomail.t index 1ff724c..2449f5a 100644 --- a/t/tests/sietima/role/nomail.t +++ b/t/tests/sietima/role/nomail.t @@ -7,7 +7,7 @@ subtest 'disabled' => sub { with_traits => ['NoMail'], subscribers => [ { - address => 'one@users.example.com', + primary => 'one@users.example.com', prefs => { wants_mail => 0 }, }, 'two@users.example.com', @@ -25,7 +25,7 @@ subtest 'enabled' => sub { with_traits => ['NoMail'], subscribers => [ { - address => 'one@users.example.com', + primary => 'one@users.example.com', prefs => { wants_mail => 1 }, }, 'two@users.example.com', diff --git a/t/tests/sietima/role/replyto.t b/t/tests/sietima/role/replyto.t index 0ede95e..e39f8b3 100644 --- a/t/tests/sietima/role/replyto.t +++ b/t/tests/sietima/role/replyto.t @@ -81,7 +81,7 @@ subtest 'enabled for some' => sub { munge_reply_to => 0, subscribers => [ { - address => 'one@users.example.com', + primary => 'one@users.example.com', prefs => { munge_reply_to => 1 }, }, 'two@users.example.com', @@ -114,7 +114,7 @@ subtest 'disabled for some' => sub { munge_reply_to => 1, subscribers => [ { - address => 'one@users.example.com', + primary => 'one@users.example.com', prefs => { munge_reply_to => 0 }, }, 'two@users.example.com', diff --git a/t/tests/sietima/role/subscriberonly/drop.t b/t/tests/sietima/role/subscriberonly/drop.t index 77b4b5f..ac37346 100644 --- a/t/tests/sietima/role/subscriberonly/drop.t +++ b/t/tests/sietima/role/subscriberonly/drop.t @@ -5,7 +5,7 @@ use Test::Sietima; my @subscriber_addresses = ( 'one@users.example.com', { - address => 'two@users.example.com', + primary => 'two@users.example.com', aliases => [ 'two-two@users.example.com' ], }, ); diff --git a/t/tests/sietima/subscriber.t b/t/tests/sietima/subscriber.t index 23651a9..6761410 100644 --- a/t/tests/sietima/subscriber.t +++ b/t/tests/sietima/subscriber.t @@ -5,7 +5,7 @@ use Sietima::Subscriber; subtest 'simple' => sub { my $s = Sietima::Subscriber->new( - raw_address => 'Gino (pino) <gino@pino.example.com>', + primary => 'Gino (pino) <gino@pino.example.com>', ); is( @@ -22,7 +22,7 @@ subtest 'simple' => sub { subtest 'aliases' => sub { my $s = Sietima::Subscriber->new( - raw_address => 'Gino (pino) <gino@pino.example.com>', + primary => 'Gino (pino) <gino@pino.example.com>', aliases => [qw(also-gino@pino.example.com maybe-gino@rino.example.com)], ); |