byterazor/qpsmtpd
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Fix the "too many dots in the beginning of the line" bug.

Browse Source 
git-svn-id: https://svn.perl.org/qpsmtpd/trunk@105 958fd67b-6ff1-0310-b445-bb7760255be9
This commit is contained in:
Ask Bjørn Hansen 2002-12-09 09:08:09 +00:00
parent 52d16950ac
commit efeb19129f
2 changed files with 3 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
Changes
View File

@ -1,5 +1,7 @@
0.20 - development 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 Add munge_subject_threshold and reject_threshold options to the
spamassassin plugin. Add documentation to the spamassassin plugin. spamassassin plugin. Add documentation to the spamassassin plugin.

1
lib/Qpsmtpd/SMTP.pm
View File

@ -286,6 +286,7 @@ sub data {
# add a transaction->blocked check back here when we have line by line plugin access... # add a transaction->blocked check back here when we have line by line plugin access...
unless (($max_size and $size > $max_size)) { unless (($max_size and $size > $max_size)) {
s/\r\n$/\n/; s/\r\n$/\n/;
s/^\.\./\./;
if ($in_header and m/^\s*$/) { if ($in_header and m/^\s*$/) {
$in_header = 0; $in_header = 0;
my @header = split /\n/, $buffer; my @header = split /\n/, $buffer;