From: Eli Zaretskii <eliz@gnu.org>
Date: Fri, 4 Jan 2002 10:25:20 +0000 (+0000)
Subject: (mail-recover-1, mail-recover): Doc fix.
X-Git-Tag: ttn-vms-21-2-B4~17326
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=918c7db7f77a5ea84931f7ca7a9ef19190faffc6;p=emacs.git

(mail-recover-1, mail-recover): Doc fix.
---

diff --git a/lisp/mail/sendmail.el b/lisp/mail/sendmail.el
index 2d3073f3b44..3e0f17e96b5 100644
--- a/lisp/mail/sendmail.el
+++ b/lisp/mail/sendmail.el
@@ -1536,7 +1536,7 @@ The seventh argument ACTIONS is a list of actions to take
     initialized))
 
 (defun mail-recover-1 ()
-  "Pop up a list of auto-saved draft messages and allow to recover them."
+  "Pop up a list of auto-saved draft messages so you can recover one of them."
   (interactive)
   (let ((file-name (make-auto-save-file-name))
 	(ls-lisp-support-shell-wildcards t)
@@ -1607,7 +1607,12 @@ The seventh argument ACTIONS is a list of actions to take
 		    default-buffer-file-coding-system))))))))
 
 (defun mail-recover ()
-  "Recover interrupted mail composition from auto-save files."
+  "Recover interrupted mail composition from auto-save files.
+
+If the mail buffer has a current valid auto-save file,
+the command recovers that file.  Otherwise, it displays a
+buffer showing the existing auto-saved draft messages;
+you can move to one of them and type C-c C-c to recover that one."
   (interactive)
   ;; In case they invoke us from some random buffer...
   (switch-to-buffer "*mail*")