From: Ken Hornstein Date: Tue, 3 Apr 2012 19:56:41 +0000 (-0400) Subject: A few more bugs I didn't catch earlier. X-Git-Url: http://git.marmaro.de/?a=commitdiff_plain;h=9e826e368de450dfdaacf38def352d6314c76b62;hp=ee8a311403280f7aefb1fb727ccbc6a9d98cce89;p=mmh A few more bugs I didn't catch earlier. --- diff --git a/docs/replyfilter b/docs/replyfilter index 8906652..193dd40 100755 --- a/docs/replyfilter +++ b/docs/replyfilter @@ -135,7 +135,7 @@ process_part(\*STDIN, $content_type, $encoding, $charset, $boundary); if ($boundary) { # - # Eat the MIME eplilog + # Eat the MIME epilog # eat_part(\*STDIN); } @@ -159,7 +159,7 @@ sub process_text (*$$;$) # quote character # - if ($encoding eq '7bit' || $encoding ne '8bit') { + if ($encoding eq '7bit' || $encoding eq '8bit') { while (<$input>) { $ret = match_boundary($_, $boundary); if (defined $ret) { @@ -218,7 +218,7 @@ sub process_text (*$$;$) pipe($foutread, $foutwrite) || die "pipe() (second) failed: $!\n"; binmode($finread, ":encoding($outcharset)"); - binmode($finread, ":encoding($outcharset)"); + binmode($finwrite, ":encoding($outcharset)"); binmode($foutread, ":encoding($outcharset)"); binmode($foutwrite, ":encoding($outcharset)");