mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-12-24 10:38:38 +00:00
Code Issues Releases Activity

(rmail-dont-reply-to): Remove leading commas as well.

Browse Source
This commit is contained in:
Gerd Moellmann 2000-02-12 19:44:56 +00:00
parent 090f7baafb
commit 97bd30eb51
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
lisp/mail/mail-utils.el
View File

@ -247,7 +247,7 @@ Usenet paths ending in an element that matches are removed also."
(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)))