diff options
| author | Gerd Moellmann <gerd@gnu.org> | 2000-09-25 15:04:30 +0000 |
|---|---|---|
| committer | Gerd Moellmann <gerd@gnu.org> | 2000-09-25 15:04:30 +0000 |
| commit | 81c5edd7e6b2ddcfe8032436f61f77093d0e392e (patch) | |
| tree | c5ca4f26469b1abd6804610119aa7a8c8025036c /lisp | |
| parent | a461758e7314906e2a3c2404f825a3334c0993f7 (diff) | |
| download | emacs-81c5edd7e6b2ddcfe8032436f61f77093d0e392e.tar.gz | |
(rmail-dont-reply-to): Fix last change.
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/mail/mail-utils.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/mail/mail-utils.el b/lisp/mail/mail-utils.el index 67e658600d8..5526dc10404 100644 --- a/lisp/mail/mail-utils.el +++ b/lisp/mail/mail-utils.el @@ -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. |