diff options
author | dakkar <dakkar@thenautilus.net> | 2017-02-07 19:59:04 +0000 |
---|---|---|
committer | dakkar <dakkar@thenautilus.net> | 2017-02-07 19:59:04 +0000 |
commit | 4a90832ad9b1436dce84e3ac0d8cb67a8fb33102 (patch) | |
tree | 6ab7e449555ce75fef2fc5befe62cd88595cbbda /lib/Sietima/Role/SubscriberOnly.pm | |
parent | POD for ::MailStore::FS (diff) | |
download | Sietima-4a90832ad9b1436dce84e3ac0d8cb67a8fb33102.tar.gz Sietima-4a90832ad9b1436dce84e3ac0d8cb67a8fb33102.tar.bz2 Sietima-4a90832ad9b1436dce84e3ac0d8cb67a8fb33102.zip |
use more Pod::Weaver
Diffstat (limited to 'lib/Sietima/Role/SubscriberOnly.pm')
-rw-r--r-- | lib/Sietima/Role/SubscriberOnly.pm | 12 |
1 files changed, 3 insertions, 9 deletions
diff --git a/lib/Sietima/Role/SubscriberOnly.pm b/lib/Sietima/Role/SubscriberOnly.pm index d2edf6b..6524d39 100644 --- a/lib/Sietima/Role/SubscriberOnly.pm +++ b/lib/Sietima/Role/SubscriberOnly.pm @@ -29,9 +29,7 @@ with messages from non-subscribers. See L<< C<Sietima::Role::SubscriberOnly::Drop> >> and L<< C<Sietima::Role::SubscriberOnly::Moderate> >> for useable roles. -=head1 REQUIRED METHODS - -=head2 C<munge_mail_from_non_subscriber> +=require C<munge_mail_from_non_subscriber> sub munge_mail_from_non_subscriber($self,$mail) { ... } @@ -48,9 +46,7 @@ requires 'munge_mail_from_non_subscriber'; our $let_it_pass=0; ## no critic(ProhibitPackageVars) -=head1 MODIFIED METHODS - -=head2 C<munge_mail> +=modif C<munge_mail> If the incoming email's C<From:> header contains an address that L<matches|Sietima::Subscriber/match> any of the subscribers, the email @@ -70,9 +66,7 @@ around munge_mail => sub ($orig,$self,$mail) { } }; -=head1 METHODS - -=head2 C<ignoring_subscriberonly> +=method C<ignoring_subscriberonly> $sietima->ignoring_subscriberonly(sub($s) { $s->handle_mail($mail); |