[Top][All Lists]
[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
----------------------------------------------------------------------
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- small correction in sendmail.el,
Frederik Fouvry <=