# HG changeset patch
# User Glenn Morris <rgm@gnu.org>
# Date 1233371735 0
# Node ID ba9c16ff3497e80d791ed9aee0fed048d377bf4b
# Parent  644f9b8a72bc12fec14e615a329d24fdf383bb9a
(rmail-new-summary): Don't try to summarize an empty folder.

diff -r 644f9b8a72bc -r ba9c16ff3497 lisp/ChangeLog
--- a/lisp/ChangeLog	Sat Jan 31 02:57:13 2009 +0000
+++ b/lisp/ChangeLog	Sat Jan 31 03:15:35 2009 +0000
@@ -1,5 +1,8 @@
 2009-01-31  Glenn Morris  <rgm@gnu.org>
 
+	* mail/rmailsum.el (rmail-new-summary): Don't try to summarize an empty
+	folder.
+
 	* mail/rmail.el (rmail-msg-is-pruned): New function.
 	(rmail-toggle-header): Doc fix.  Use rmail-msg-is-pruned.
 	(rmail-reply): Set up to yank from the decoded message rather than the
diff -r 644f9b8a72bc -r ba9c16ff3497 lisp/mail/rmailsum.el
--- a/lisp/mail/rmailsum.el	Sat Jan 31 02:57:13 2009 +0000
+++ b/lisp/mail/rmailsum.el	Sat Jan 31 03:15:35 2009 +0000
@@ -204,8 +204,9 @@
     (if (eq major-mode 'rmail-summary-mode)
 	(setq was-in-summary t))
     (with-current-buffer rmail-buffer
-      (setq mesg rmail-current-message
-	    rmail-summary-buffer (rmail-new-summary-1 desc redo func args)))
+      (if (zerop (setq mesg rmail-current-message))
+	  (error "No messages to summarize"))
+      (setq rmail-summary-buffer (rmail-new-summary-1 desc redo func args)))
     ;; Now display the summary buffer and go to the right place in it.
     (unless was-in-summary
       (if (and (one-window-p)