Mercurial > emacs

changeset 20409:87d7cc50d029

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(mail-parse-comma-list): Treat newlines and tabs as whitespace.
author Karl Heuer <kwzh@gnu.org>
date Thu, 04 Dec 1997 05:26:28 +0000
parents 704e096f6a96
children af925352116e
files lisp/mail/mail-utils.el
diffstat 1 files changed, 3 insertions(+), 3 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/mail/mail-utils.el	Thu Dec 04 05:25:59 1997 +0000
+++ b/lisp/mail/mail-utils.el	Thu Dec 04 05:26:28 1997 +0000
@@ -258,16 +258,16 @@
 (defun mail-parse-comma-list ()
   (let (accumulated
 	beg)
-    (skip-chars-forward " ")
+    (skip-chars-forward " \t\n")
     (while (not (eobp))
       (setq beg (point))
       (skip-chars-forward "^,")
-      (skip-chars-backward " ")
+      (skip-chars-backward " \t\n")
       (setq accumulated
 	    (cons (buffer-substring-no-properties beg (point))
 		  accumulated))
       (skip-chars-forward "^,")
-      (skip-chars-forward ", "))
+      (skip-chars-forward ", \t\n"))
     accumulated))
 
 (defun mail-comma-list-regexp (labels)