aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authordakkar <dakkar@thenautilus.net>2023-02-28 13:01:29 +0000
committerdakkar <dakkar@thenautilus.net>2023-02-28 13:01:59 +0000
commitbd82aae9e736df4b0f84fc0eb44cd5aa5ce00606 (patch)
treef196d3317db0f9783f73b40b3d86d5ac48f2e293
parentdocumentation fixes (diff)
downloadSietima-bd82aae9e736df4b0f84fc0eb44cd5aa5ce00606.tar.gz
Sietima-bd82aae9e736df4b0f84fc0eb44cd5aa5ce00606.tar.bz2
Sietima-bd82aae9e736df4b0f84fc0eb44cd5aa5ce00606.zip
simplify SubscriberOnly::Moderate
-rw-r--r--Changes1
-rw-r--r--lib/Sietima/Role/SubscriberOnly/Moderate.pm5
2 files changed, 4 insertions, 2 deletions
diff --git a/Changes b/Changes
index bf3a551..d4c43b6 100644
--- a/Changes
+++ b/Changes
@@ -1,5 +1,6 @@
{{$NEXT}}
- documentation fixes
+ - simplified SubscriberOnly::Moderate
1.1.0 2023-02-28 11:56:27+00:00 Europe/London
- require perl 5.36
diff --git a/lib/Sietima/Role/SubscriberOnly/Moderate.pm b/lib/Sietima/Role/SubscriberOnly/Moderate.pm
index b4d144c..42e5bc3 100644
--- a/lib/Sietima/Role/SubscriberOnly/Moderate.pm
+++ b/lib/Sietima/Role/SubscriberOnly/Moderate.pm
@@ -59,11 +59,12 @@ sub munge_mail_from_non_subscriber ($self,$mail) {
# problems with encodings other than this
encoding => '7bit',
);
- $self->transport->send($notice->email,{
+
+ return Sietima::Message->new({
+ mail => $notice->email,
from => $self->return_path,
to => [ $self->owner ],
});
- return;
}
=method C<resume>