develooper Front page | perl.cvs.qpsmtpd | Postings from March 2007

[svn:qpsmtpd] r722 - in trunk: . lib/Qpsmtpd

From:
ask
Date:
March 14, 2007 23:13
Subject:
[svn:qpsmtpd] r722 - in trunk: . lib/Qpsmtpd
Message ID:
20070315061319.F248ECBA2F@x12.develooper.com
Author: ask
Date: Wed Mar 14 23:13:18 2007
New Revision: 722

Modified:
   trunk/Changes
   trunk/lib/Qpsmtpd/SMTP.pm

Log:
  Correct header parsing of "space only" lines (Joerg Meyer)

  (issue #11 - http://code.google.com/p/smtpd/issues/detail?id=11 )


Modified: trunk/Changes
==============================================================================
--- trunk/Changes	(original)
+++ trunk/Changes	Wed Mar 14 23:13:18 2007
@@ -1,5 +1,7 @@
 0.33 (to be)
 
+  Correct header parsing of "space only" lines (Joerg Meyer)
+
   Update the sample configuration to use zen.spamhaus.org
 
   Support "module" plugins ("My::Plugin" in the config/plugins file)

Modified: trunk/lib/Qpsmtpd/SMTP.pm
==============================================================================
--- trunk/lib/Qpsmtpd/SMTP.pm	(original)
+++ trunk/lib/Qpsmtpd/SMTP.pm	Wed Mar 14 23:13:18 2007
@@ -616,7 +616,7 @@
     unless (($max_size and $size > $max_size)) {
       s/\r\n$/\n/;
       s/^\.\./\./;
-      if ($in_header and m/^\s*$/) {
+      if ($in_header and m/^$/) {
         $in_header = 0;
         my @headers = split /^/m, $buffer;
 



nntp.perl.org: Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at ask@perl.org | Group listing | About