cvs commit: qpsmtpd/lib/Qpsmtpd SMTP.pm
[email protected] (Matt Sergeant)
| Newsgroups | perl.cvs.qpsmtpd |
|---|---|
| Message-ID | <[email protected]> |
cvsuser 03/11/01 02:05:23
Modified: lib/Qpsmtpd SMTP.pm
Log:
Don't unfold header lines.
Revision Changes Path
1.18 +1 -1 qpsmtpd/lib/Qpsmtpd/SMTP.pm
Index: SMTP.pm
===================================================================
RCS file: /cvs/public/qpsmtpd/lib/Qpsmtpd/SMTP.pm,v
retrieving revision 1.17
retrieving revision 1.18
diff -u -w -r1.17 -r1.18
--- SMTP.pm 15 Sep 2003 10:50:27 -0000 1.17
+++ SMTP.pm 1 Nov 2003 10:05:23 -0000 1.18
@@ -343,7 +343,7 @@
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.
#