Bug 479446: email_in.pl wasn't splitting lines properly when they ended with CRLF...

Patch by Eric Olson <Eric.Olson@adm.com> r=mkanat, a=mkanat

diff --git a/email_in.pl b/email_in.pl
index 1edce55d8268c167d5091abf563c9f1fe3c12a71..59a716a57a7d742cc05c21b7b7c16c8d46d8f0ce 100644 (file)
--- a/email_in.pl
+++ b/email_in.pl
@@ -88,7 +88,7 @@ sub parse_mail {
     debug_print("Body:\n" . $body, 3);
 
     $body = remove_leading_blank_lines($body);
-    my @body_lines = split("\n", $body);
+    my @body_lines = split(/\r?\n/s, $body);
 
     # If there are fields specified.
     if ($body =~ /^\s*@/s) {