From 38c9d24d3312fcbfd72e0229d9c4268302dd4a3f Mon Sep 17 00:00:00 2001
From: =?utf8?q?Fr=C3=A9d=C3=A9ric=20Buclin?= <LpSolit@gmail.com>
Date: Wed, 4 Aug 2010 02:09:53 +0200
Subject: [PATCH] Bug 584018: @foo= bar in email_in.pl is not parsed correctly,
 due to a missing whitespace before "=" r/a=mkanat

---
 email_in.pl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/email_in.pl b/email_in.pl
index fd86bcecf1..0382c4e8aa 100755
--- a/email_in.pl
+++ b/email_in.pl
@@ -106,7 +106,7 @@ sub parse_mail {
             # Otherwise, we stop parsing fields on the first blank line.
             $line = trim($line);
             last if !$line;
-            if ($line =~ /^\@(\S+)\s*(?:=|\s|$)\s*(.*)\s*/) {
+            if ($line =~ /^\@(\w+)\s*(?:=|\s|$)\s*(.*)\s*/) {
                 $current_field = lc($1);
                 $fields{$current_field} = $2;
             }
-- 
2.47.2