Fix the "too many dots in the beginning of the line" bug.
git-svn-id: https://svn.perl.org/qpsmtpd/trunk@105 958fd67b-6ff1-0310-b445-bb7760255be9
This commit is contained in:
parent
52d16950ac
commit
efeb19129f
2
Changes
2
Changes
@ -1,5 +1,7 @@
|
||||
0.20 - development
|
||||
|
||||
Fix the "too many dots in the beginning of the line" bug.
|
||||
|
||||
Add munge_subject_threshold and reject_threshold options to the
|
||||
spamassassin plugin. Add documentation to the spamassassin plugin.
|
||||
|
||||
|
@ -286,6 +286,7 @@ sub data {
|
||||
# add a transaction->blocked check back here when we have line by line plugin access...
|
||||
unless (($max_size and $size > $max_size)) {
|
||||
s/\r\n$/\n/;
|
||||
s/^\.\./\./;
|
||||
if ($in_header and m/^\s*$/) {
|
||||
$in_header = 0;
|
||||
my @header = split /\n/, $buffer;
|
||||
|
Loading…
Reference in New Issue
Block a user