danf: curl-www/auto summarize.pl,1.43,1.44
| Newsgroups | gmane.comp.web.curl.www.cvs |
|---|---|
| Message-ID | <[email protected]> |
Update of /cvsroot/curl/curl-www/auto
In directory labb:/tmp/cvs-serv24728
Modified Files:
summarize.pl
Log Message:
Replace equals sign after all the other quoted-printable replacements.
Add replacement for 'F' which some mailers quote when it appears at the
beginning of the line.
Index: summarize.pl
===================================================================
RCS file: /cvsroot/curl/curl-www/auto/summarize.pl,v
retrieving revision 1.43
retrieving revision 1.44
diff -u -d -r1.43 -r1.44
--- summarize.pl 31 Jan 2007 10:02:31 -0000 1.43
+++ summarize.pl 31 Jan 2007 22:08:13 -0000 1.44
@@ -383,9 +383,10 @@
while(<READ>) {
chomp;
my $line = $_;
- # MIME-replacements
- $line =~ s/=3D/=/g;
+ # simple quoted-printable MIME-replacements
$line =~ s/=20/ /g;
+ $line =~ s/=46/F/g;
+ $line =~ s/=3D/=/g;
# print "L: $state - $line\n";
if($line =~ /^INPIPE: startsingle here ([0-9-]*)/) {