X-Git-Url: https://git.deb.at/w?p=pkg%2Ft-prot.git;a=blobdiff_plain;f=contrib%2Ft-prot.sl;h=8d8431f8193f0bc5c203bac28f7aa1cd4c8d5e61;hp=80ba4429cac114da6450af2c926b3efb0a377b0a;hb=85acafdeccdc72409c35b05991c4bf9b350f1ecb;hpb=59f87ac047552c79d2885106c9dde3967563190a diff --git a/contrib/t-prot.sl b/contrib/t-prot.sl index 80ba442..8d8431f 100644 --- a/contrib/t-prot.sl +++ b/contrib/t-prot.sl @@ -1,5 +1,5 @@ -% $Id: t-prot.sl,v 1.14 2005/03/31 19:39:08 jochen Exp $ -% Copyright (c) 2003 Jochen Striepe +% $Id: t-prot.sl,v 1.16 2005/05/10 13:09:06 jochen Exp $ +% Copyright (c) 2003-2005 Jochen Striepe % % This file is provided as an example implemention for articles to be % filtered through t-prot before displayed. They are still filtered if @@ -51,7 +51,7 @@ % these should be reasonable defaults (they work fine for me, SCNR): variable t_prot_params = "-aceklmtS --diff --bigq -L$HOME/.slrn/mlfooters -A$HOME/.slrn/adfooters"; -variable t_prot_tmpdir = "$HOME/tmp/slrn"; +variable t_prot_tmpdir = "$HOME/tmp/slrn"; % you better make sure it exists variable t_prot_qp = "perl -i -p -e '$p=1 if /^Content-Transfer-Encoding: quoted-printable/i; if ($p==1) { s/=([0-9a-f][0-9a-f])/chr(hex($1))/egi; s/=\n//eg; };'"; define t_prot () {