Don't unfold header lines.

git-svn-id: https://svn.perl.org/qpsmtpd/trunk@178 958fd67b-6ff1-0310-b445-bb7760255be9
This commit is contained in:
Matt Sergeant 2003-11-01 10:05:23 +00:00
parent 29bbbece90
commit b442d002f1

View File

@ -343,7 +343,7 @@ sub data {
s/^\.\./\./; 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 /^/m, $buffer;
# ... need to check that we don't reformat any of the received lines. # ... need to check that we don't reformat any of the received lines.
# #