From b442d002f179208f57d9f5009fbf97d17877da6a Mon Sep 17 00:00:00 2001 From: Matt Sergeant <matt@sergeant.org> Date: Sat, 1 Nov 2003 10:05:23 +0000 Subject: [PATCH] Don't unfold header lines. git-svn-id: https://svn.perl.org/qpsmtpd/trunk@178 958fd67b-6ff1-0310-b445-bb7760255be9 --- lib/Qpsmtpd/SMTP.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lib/Qpsmtpd/SMTP.pm b/lib/Qpsmtpd/SMTP.pm index d545544..8807955 100644 --- a/lib/Qpsmtpd/SMTP.pm +++ b/lib/Qpsmtpd/SMTP.pm @@ -343,7 +343,7 @@ sub data { s/^\.\./\./; if ($in_header and m/^\s*$/) { $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. #