(mail-send): Use [[:space:]] instead of a literal blank

when splitting new-header-values.

diff --git a/lisp/mail/sendmail.el b/lisp/mail/sendmail.el
index d0b6d84..a6d24f5 100644 (file)
--- a/lisp/mail/sendmail.el
+++ b/lisp/mail/sendmail.el
@@ -810,7 +810,8 @@ the user from the mailer."
                             '(lambda (e)
                                (unless (member e l)
                                  (push e l)))
-                            (split-string new-header-values ", +" t))
+                            (split-string new-header-values
+                                          ",[[:space:]]+" t))
                            (mapconcat 'identity l ", "))
                          "\n"))
                ;; Add Mail-Reply-To if none yet