aboutsummaryrefslogtreecommitdiff
path: root/lib/Sietima/Subscriber.pm
diff options
context:
space:
mode:
Diffstat (limited to 'lib/Sietima/Subscriber.pm')
-rw-r--r--lib/Sietima/Subscriber.pm2
1 files changed, 2 insertions, 0 deletions
diff --git a/lib/Sietima/Subscriber.pm b/lib/Sietima/Subscriber.pm
index 44b36ed..68f119b 100644
--- a/lib/Sietima/Subscriber.pm
+++ b/lib/Sietima/Subscriber.pm
@@ -35,6 +35,8 @@ has prefs => (
);
sub match {
+ # we can't use the sub signature here, because we need the
+ # coercion
state $check = compile(Object,Address->plus_coercions(AddressFromStr));
my ($self,$addr) = $check->(@_);