mda: drop leading "From " lines again

Oops...

While we're at it, drop blank lines before the "From ", too,
since it could happen.

1 files changed, 1 insertions, 1 deletions

diff --git a/script/public-inbox-learn b/script/public-inbox-learn
index 7ef2a312..09fd7c8f 100755
--- a/script/public-inbox-learn
+++ b/script/public-inbox-learn
@@ -26,7 +26,7 @@ my $err;
 my $mime = Email::MIME->new(eval {
         local $/;
         my $data = scalar <STDIN>;
-        $data =~ s/\AFrom [^\r\n]*\r?\n//s;
+        $data =~ s/\A[\r\n]*From [^\r\n]*\r?\n//s;
         eval {
                 if ($train eq 'ham') {
                         $spamc->hamlearn(\$data);