procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

(rmail-dont-reply-to): Delete debugging code.

Browse source 
Don't insist on whitespace after commas.
This commit is contained in:
Richard M. Stallman 1997-03-22 03:44:08 +00:00
parent 7b3478a5e8
commit 13c2b5cb77
1 changed files with 1 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
lisp/mail/mail-utils.el
View file

@ -148,12 +148,11 @@ Usenet paths ending in an element that matches are removed also."
"\\)"))
(case-fold-search t)
pos epos)
(setq foo match)
(while (setq pos (string-match match userids))
(if (> pos 0) (setq pos (match-beginning 2)))
(setq epos
;; Delete thru the next comma, plus whitespace after.
(if (string-match ",[ \t\n]+" userids (match-end 0))
(if (string-match ",[ \t\n]*" userids (match-end 0))
(match-end 0)
(length userids)))
(setq userids