Mercurial > emacs

diff lisp/mail/mail-utils.el @ 31880:36481aee6585

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(rmail-dont-reply-to): Fix last change.
author Gerd Moellmann <gerd@gnu.org>
date Mon, 25 Sep 2000 15:04:30 +0000
parents a388bd44da52
children 16d2187c5524
line wrap: on
line diff
--- a/lisp/mail/mail-utils.el	Mon Sep 25 14:43:35 2000 +0000
+++ b/lisp/mail/mail-utils.el	Mon Sep 25 15:04:30 2000 +0000
@@ -224,7 +224,7 @@
 	(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.