emacs-pretest-bug
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

small correction in sendmail.el


From: Frederik Fouvry
Subject: small correction in sendmail.el
Date: Wed, 18 May 2005 10:57:56 +0200 (CEST)

Symptoms:


The regexp in `split-string' should be more general, in order to
catch addresses separated by other white space values than SPACE.

----------------------------------------------------------------------
RCS file: /cvsroot/emacs/emacs/lisp/mail/sendmail.el,v
retrieving revision 1.282
diff -b -c -r1.282 sendmail.el
*** lisp/mail/sendmail.el.old   24 Apr 2005 21:32:59 -0000      1.282
--- lisp/mail/sendmail.el       18 May 2005 08:52:43 -0000
***************
*** 810,816 ****
                             '(lambda (e)
                                (unless (member e l)
                                  (push e l)))
!                            (split-string new-header-values ", +" t))
                            (mapconcat 'identity l ", "))
                          "\n"))
                ;; Add Mail-Reply-To if none yet
--- 810,816 ----
                             '(lambda (e)
                                (unless (member e l)
                                  (push e l)))
!                            (split-string new-header-values ",[[:space:]]+" t))
                            (mapconcat 'identity l ", "))
                          "\n"))
                ;; Add Mail-Reply-To if none yet
----------------------------------------------------------------------




reply via email to

[Prev in Thread] Current Thread [Next in Thread]