diff options
Diffstat (limited to 'lib/Sietima/Types.pm')
-rw-r--r-- | lib/Sietima/Types.pm | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lib/Sietima/Types.pm b/lib/Sietima/Types.pm index 3288972..1c75b1f 100644 --- a/lib/Sietima/Types.pm +++ b/lib/Sietima/Types.pm @@ -165,14 +165,14 @@ class_type Subscriber, { class => 'Sietima::Subscriber' }; declare_coercion SubscriberFromAddress, to_type Subscriber, from Address, - q{ Sietima::Subscriber->new(raw_address=>$_) }; + q{ Sietima::Subscriber->new(primary=>$_) }; declare_coercion SubscriberFromStr, to_type Subscriber, from Str, - q{ Sietima::Subscriber->new(raw_address=>(Email::Address->parse($_))[0]) }; + q{ Sietima::Subscriber->new(primary=>(Email::Address->parse($_))[0]) }; declare_coercion SubscriberFromHashRef, to_type Subscriber, from HashRef, - q{ my $a = delete $_->{address};Sietima::Subscriber->new({raw_address => $a, $_->%* }) }; + q{ Sietima::Subscriber->new($_) }; 1; |