changeset 17640:bd31032a2940

(rmail-count-new-messages): Fix previous change.
author Richard M. Stallman <rms@gnu.org>
date Sun, 04 May 1997 03:44:31 +0000
parents 5339baa0a334
children 4650d25e48f6
files lisp/mail/rmail.el
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/mail/rmail.el	Sun May 04 02:29:41 1997 +0000
+++ b/lisp/mail/rmail.el	Sun May 04 03:44:31 1997 +0000
@@ -1798,7 +1798,7 @@
     (setq rmail-msgref-vector
 	  (vconcat rmail-msgref-vector (make-vector total-messages nil)))
     ;; Fill in the new elements of rmail-msgref-vector.
-    (let ((i (- rmail-total-messages old-total-messages)))
+    (let ((i (1+ (- rmail-total-messages total-messages))))
       (while (<= i rmail-total-messages)
 	(aset rmail-msgref-vector i (list i))
 	(setq i (1+ i))))