# HG changeset patch
# User Glenn Morris <rgm@gnu.org>
# Date 1233287191 0
# Node ID 26b8d12cf7a4376e55221a47f90e893aa82eb3f9
# Parent  782b6464073ebe7e67331aab07b07d36e38308f2
(rmail-reply): Handle empty folders.

diff -r 782b6464073e -r 26b8d12cf7a4 lisp/mail/rmail.el
--- a/lisp/mail/rmail.el	Fri Jan 30 03:45:51 2009 +0000
+++ b/lisp/mail/rmail.el	Fri Jan 30 03:46:31 2009 +0000
@@ -3282,6 +3282,8 @@
 prefix argument means ignore them.  While composing the reply,
 use \\[mail-yank-original] to yank the original message into it."
   (interactive "P")
+  (if (zerop rmail-current-message)
+      (error "There is no message to reply to"))
   (let (from reply-to cc subject date to message-id references
 	     resent-to resent-cc resent-reply-to
 	     (msgnum rmail-current-message))