Re: Email Style (was: Re: Election Manifestos)

[Mark Fowler]

On Thu, 24 May 2001, Leon Brocard wrote:

> Paul Makepeace sent the following bits through the ether:
>
> > Have you integrated into a mail server (module, procmail, whatever)
>
> .muttrc: set editor="/home/acme/bin/autoformat %s; xemacs -nw %s"
>
> Leon
>

in PINE

S SETUP -> C Config

display-filters: ~mark/bin/autoformat

where autoformat is simply

<perl>

#!/usr/bin/perl
use strict;
use Text::Autoformat;

$_ = <>;

# don't process the headers
if (/^Subject/)
{
     print;
     print while (<>);
     exit;
}

# slurp in text and process
my $foo = $_;
$foo .= $_ while (<>);
$_ = autoformat($foo, {all => 1});

# begon disclaimers
s/The information contained in this communication.*//si;

print;

</perl>

Later

Mark

--
 My other mail program has a .muttrc