diff options
| author | dakkar <dakkar@thenautilus.net> | 2016-12-29 15:52:34 +0000 |
|---|---|---|
| committer | dakkar <dakkar@thenautilus.net> | 2016-12-29 15:52:34 +0000 |
| commit | 1b15f6a6858abb3413dc2df0c647690874f20b27 (patch) | |
| tree | 84e01e4030b43d3fd59254fd9c52942ae42772c4 /lib | |
| parent | tweak TODO (diff) | |
| download | Sietima-1b15f6a6858abb3413dc2df0c647690874f20b27.tar.gz Sietima-1b15f6a6858abb3413dc2df0c647690874f20b27.tar.bz2 Sietima-1b15f6a6858abb3413dc2df0c647690874f20b27.zip | |
tests for moderation cmdline
Diffstat (limited to 'lib')
| -rw-r--r-- | lib/Sietima/Role/SubscriberOnly/Moderate.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/Sietima/Role/SubscriberOnly/Moderate.pm b/lib/Sietima/Role/SubscriberOnly/Moderate.pm index 678b66c..8bfef2f 100644 --- a/lib/Sietima/Role/SubscriberOnly/Moderate.pm +++ b/lib/Sietima/Role/SubscriberOnly/Moderate.pm @@ -52,7 +52,7 @@ sub show_mail_from_moderation_queue ($self,$runner,@) { my $id = $runner->parameters->{'mail-id'}; my $mail = $self->mail_store->retrieve_by_id($id); $runner->out("Message $id:"); - $runner->out($mail->as_string); + $runner->out($mail->as_string =~ s{\r\n}{\n}gr); } around command_line_spec => sub ($orig,$self) { |