X-Git-Url: http://git.marmaro.de/?a=blobdiff_plain;f=docs%2Fcontrib%2Freplyfilter;h=8e591bd03f7ac68975fc0201a8e1d1792c3b3eff;hb=f4180c605026aeaadf5ebf6c63fc22b99c31004f;hp=2e987946c745ce226d4938f54b44420673768758;hpb=acf0c6e13383bef83c288fd44dcf885b0ac69ebe;p=mmh diff --git a/docs/contrib/replyfilter b/docs/contrib/replyfilter index 2e98794..8e591bd 100755 --- a/docs/contrib/replyfilter +++ b/docs/contrib/replyfilter @@ -661,15 +661,15 @@ sub null_decoder ($) sub match_boundary($$) { - my ($_, $boundary) = @_; + my ($line, $boundary) = @_; return if ! defined $boundary; - if (substr($_, 0, 2) eq '--') { - s/[ \t\r\n]+\Z//; - if ($_ eq "--$boundary") { + if (substr($line, 0, 2) eq '--') { + $line =~ s/[ \t\r\n]+\Z//; + if ($line eq "--$boundary") { return 'EOP'; - } elsif ($_ eq "--$boundary--") { + } elsif ($line eq "--$boundary--") { return 'EOM'; } }