X-Git-Url: http://www.git.stargrave.org/?p=public-inbox.git;a=blobdiff_plain;f=lib%2FPublicInbox%2FInboxWritable.pm;h=f2ba21fcbdfa02051d1a5d8677a81279942978f5;hp=ce979ea2bf8c65fe2f5f72ce16ef5d58515b5762;hb=f63bdad8579f96901e08d2e7d9cd46ea528ffcce;hpb=1a02e2d367b71eca9fc8093ce83fcae50873003d diff --git a/lib/PublicInbox/InboxWritable.pm b/lib/PublicInbox/InboxWritable.pm index ce979ea2..f2ba21fc 100644 --- a/lib/PublicInbox/InboxWritable.pm +++ b/lib/PublicInbox/InboxWritable.pm @@ -157,12 +157,12 @@ my $from_strict = qr/^From \S+ +\S+ \S+ +\S+ [^:]+:[^:]+:[^:]+ [^:]+/; sub mb_add ($$$$) { my ($im, $variant, $filter, $msg) = @_; $$msg =~ s/(\r?\n)+\z/$1/s; - my $mime = PublicInbox::MIME->new($msg); if ($variant eq 'mboxrd') { - $$msg =~ s/^>(>*From )/$1/sm; + $$msg =~ s/^>(>*From )/$1/gms; } elsif ($variant eq 'mboxo') { - $$msg =~ s/^>From /From /sm; + $$msg =~ s/^>From /From /gms; } + my $mime = PublicInbox::MIME->new($msg); if ($filter) { my $ret = $filter->scrub($mime) or return; return if $ret == REJECT();