Mercurial > emacs
changeset 27682:fe108abb04e5
(rmail-dont-reply-to): Remove leading commas as well.
author | Gerd Moellmann <gerd@gnu.org> |
---|---|
date | Sat, 12 Feb 2000 19:44:56 +0000 |
parents | 2e811e86c10b |
children | 9ccf5aad8bcf |
files | lisp/mail/mail-utils.el |
diffstat | 1 files changed, 1 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/mail/mail-utils.el Sat Feb 12 19:37:56 2000 +0000 +++ b/lisp/mail/mail-utils.el Sat Feb 12 19:44:56 2000 +0000 @@ -247,7 +247,7 @@ (if (setq pos (string-match "[ ,\t\n]*\\'" userids)) (setq userids (substring userids 0 pos))) ;; remove leading spaces. they bother me. - (if (string-match "\\s *" userids) + (if (string-match "\\(\\s \\|,\\)*" userids) (substring userids (match-end 0)) userids)))