# HG changeset patch
# User Eli Zaretskii <eliz@gnu.org>
# Date 1067704655 0
# Node ID c4870e1214891daae65db31673010e6fa618d10b
# Parent  19c95cdf2c4a572391a807c6e5594bb6f91f1597
(rmail-summary-goto-msg): Don't call itself
recursively if the last message is deleted, thus avoiding an
infinite loop.

diff -r 19c95cdf2c4a -r c4870e121489 lisp/mail/rmailsum.el
--- a/lisp/mail/rmailsum.el	Fri Oct 31 22:04:05 2003 +0000
+++ b/lisp/mail/rmailsum.el	Sat Nov 01 16:37:35 2003 +0000
@@ -1074,7 +1074,8 @@
       (if (< n 1)
 	  (progn (message "No preceding message")
 		 (setq n 1)))
-      (if (> n total)
+      (if (and (> n total)
+	       (> total 0))
 	  (progn (message "No following message")
 		 (goto-char (point-max))
 		 (rmail-summary-goto-msg nil nowarn skip-rmail)))