(rmail-default-body-file): New variable.

diff --git a/lisp/mail/rmail.el b/lisp/mail/rmail.el
index 972f7d004777b39153824fde26aef0473d2ef581..5b9c0f6265136bb1079348e835cf42ce6428a646 100644 (file)
--- a/lisp/mail/rmail.el
+++ b/lisp/mail/rmail.el
@@ -321,6 +321,11 @@ by substituting the new message number into the existing list.")
   "*Default file name for \\[rmail-output-to-rmail-file]."
   :type 'file
   :group 'rmail-files)
+(defcustom rmail-default-body-file "~/mailout"
+  "*Default file name for \\[rmail-output-body-to-file]."
+  :type 'file
+  :group 'rmail-files
+  :version "20.3")
 
 ;; Mule and MIME related variables.