(message-auto-save-directory): Renamed from

message-autosave-directory.  All references changed.

1 files changed, 10 insertions, 10 deletions

diff --git a/lisp/gnus/message.el b/lisp/gnus/message.el
index 185696f874a..4a5993e7d63 100644
--- a/lisp/gnus/message.el
+++ b/lisp/gnus/message.el
@@ -269,10 +269,10 @@ If t, use `message-user-organization-file'."
   :type 'file
   :group 'message-headers)
 
-(defcustom message-autosave-directory "~/"
+(defcustom message-auto-save-directory "~/"
   ; (concat (file-name-as-directory message-directory) "drafts/")
-  "*Directory where message autosaves buffers.
-If nil, message won't autosave."
+  "*Directory where message auto-saves buffers.
+If nil, message won't auto-save."
   :group 'message-buffers
   :type 'directory)
 
@@ -1546,7 +1546,7 @@ name, rather than giving an automatic name."
                        (read-string "New buffer name: " name-default)
                      name-default))
              (default-directory
-               (file-name-as-directory message-autosave-directory)))
+               (file-name-as-directory message-auto-save-directory)))
         (rename-buffer name t)))))
 
 (defun message-fill-yanked-message (&optional justifyp)
@@ -1790,7 +1790,7 @@ the user from the mailer."
         ;; (mail-hist-put-headers-into-history))
         (run-hooks 'message-sent-hook)
         (message "Sending...done")
-        ;; If buffer has no file, mark it as unmodified and delete autosave.
+        ;; If buffer has no file, mark it as unmodified and delete auto-save.
         (unless buffer-file-name
           (set-buffer-modified-p nil)
           (delete-auto-save-file-if-necessary t))
@@ -1988,7 +1988,7 @@ to find out how to use this."
   (let ((mh-previous-window-config nil)
         (name (make-temp-name
                (concat (file-name-as-directory
-                        (expand-file-name message-autosave-directory))
+                        (expand-file-name message-auto-save-directory))
                        "msg."))))
     (setq buffer-file-name name)
     ;; MH wants to generate these headers itself.
@@ -3024,12 +3024,12 @@ Headers already prepared in the buffer are not modified."
 
 (defun message-set-auto-save-file-name ()
   "Associate the message buffer with a file in the drafts directory."
-  (when message-autosave-directory
-    (unless (file-exists-p message-autosave-directory)
-      (make-directory message-autosave-directory t))
+  (when message-auto-save-directory
+    (unless (file-exists-p message-auto-save-directory)
+      (make-directory message-auto-save-directory t))
     (let ((name (make-temp-name
                  (expand-file-name
-                  (concat (file-name-as-directory message-autosave-directory)
+                  (concat (file-name-as-directory message-auto-save-directory)
                           "msg."
                           (nnheader-replace-chars-in-string
                            (nnheader-replace-chars-in-string