mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-01-16 17:19:41 +00:00
Code Issues Releases Activity

(rmail-dont-reply-to): Fix last change.

Browse Source
This commit is contained in:
Gerd Moellmann 2000-09-25 15:04:30 +00:00
parent a461758e73
commit 81c5edd7e6
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

@ -224,7 +224,7 @@ Usenet paths ending in an element that matches are removed also."
(case-fold-search t)
pos epos)
(while (and (setq pos (string-match match userids pos))
(> (length userids 0)))
(> (length userids) 0))
;; If there's a match, it starts at the beginning of the string,
;; or with `,'. We must delete from that position to the
;; end of the user-id which starts at match-beginning 2.