[cvs] bogofilter/contrib mime.get.rfc822,NONE,1.1

[Matthias Andree]

relson at users.sourceforge.net writes:

> Update of /cvsroot/bogofilter/bogofilter/contrib
> In directory sc8-pr-cvs1:/tmp/cvs-serv31906
>
> Added Files:
> 	mime.get.rfc822 
> Log Message:
> Initial release of mime.get.rfc822
>
> --- NEW FILE: mime.get.rfc822 ---
> #!/usr/bin/perl -w
>
> =head1 NAME
>
> mime.get.rfc822 - splits out message/rfc822 parts from a MIME message
[...]
> 	if ($subent->effective_type eq "message/rfc822") {
> 		print "From invalid\@example.com Mon May 19 18:00:00 2003\n";
> 		my $body = $subent->stringify_body;
> 		$body =~ s/^From />From /mg;
> 		$body =~ s/\n*$/\n\n/;

What's the previous line (the LF fiddling) good for?

-- 
Matthias Andree