# HG changeset patch # User Richard M. Stallman # Date 1160694044 0 # Node ID c51c8fa9c1f1fd91e57d2cb8bae1283eecb23ce6 # Parent 2530d72a03dbfd3314194189e2c00858a582cee6 (file-name-history): Add defvar. (save-some-buffers-action-alist): Improve description strings. diff -r 2530d72a03db -r c51c8fa9c1f1 lisp/files.el --- a/lisp/files.el Thu Oct 12 19:59:58 2006 +0000 +++ b/lisp/files.el Thu Oct 12 23:00:44 2006 +0000 @@ -514,6 +514,9 @@ :type 'boolean :group 'view) +(defvar file-name-history nil + "History list of file names entered in the minibuffer.") + (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 @@ (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 @@ (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