diff options
Diffstat (limited to 'script/public-inbox-learn')
-rwxr-xr-x | script/public-inbox-learn | 2 |
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); |