diff options
Diffstat (limited to 'lisp/files.el')
-rw-r--r-- | lisp/files.el | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/lisp/files.el b/lisp/files.el index 59077cd266a..c265f33550f 100644 --- a/lisp/files.el +++ b/lisp/files.el @@ -1702,6 +1702,10 @@ rather than FUN itself, to `minibuffer-setup-hook'." (list (read-file-name prompt nil default-directory mustmatch) t)) +(defun file-name-history--add (file) + "Add FILE to `file-name-history'." + (add-to-history 'file-name-history (abbreviate-file-name file))) + (defun find-file (filename &optional wildcards) "Edit file FILENAME. Switch to a buffer visiting file FILENAME, |