(file-name-history): Add defvar.

(save-some-buffers-action-alist): Improve description strings.

diff --git a/lisp/files.el b/lisp/files.el
index 556c5e680b7df00c90d55f9788cb3057c2538eb3..4b746225f60050439999a571c2c4c255eb5a8004 100644 (file)
--- a/lisp/files.el
+++ b/lisp/files.el
@@ -514,6 +514,9 @@ using \\[toggle-read-only]."
   :type 'boolean
   :group 'view)
 
+(defvar file-name-history nil
+  "History list of file names entered in the minibuffer.")
+\f
 (put 'ange-ftp-completion-hook-function 'safe-magic t)
 (defun ange-ftp-completion-hook-function (op &rest args)
   "Provides support for ange-ftp host name completion.
@@ -3730,7 +3733,7 @@ This requires the external program `diff' to be in your `exec-path'."
        (recursive-edit)
        ;; Return nil to ask about BUF again.
        nil)
-     "view this file")
+     "view this buffer")
     (?d (lambda (buf)
          (save-window-excursion
            (diff-buffer-with-file buf))
@@ -3738,7 +3741,7 @@ This requires the external program `diff' to be in your `exec-path'."
                       (lambda (ignore) (exit-recursive-edit)))
          (recursive-edit)
          nil)
-       "view changes in file"))
+       "view changes in this buffer"))
   "ACTION-ALIST argument used in call to `map-y-or-n-p'.")
 
 (defvar buffer-save-without-query nil