mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-26 07:33:47 +00:00
Code Issues Releases Activity

* lisp/files.el (after-find-file): Use substitute-command-keys.

Browse Source
This commit is contained in:
Stefan Kangas 2022-10-02 17:52:05 +02:00
parent 0a40120b40
commit 4839b42a16
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
lisp/files.el
View File

@ -2711,7 +2711,8 @@ unless NOMODES is non-nil."
(file-newer-than-file-p (or buffer-auto-save-file-name
(make-auto-save-file-name))
buffer-file-name))
(format "%s has auto save data; consider M-x recover-this-file"
(format (substitute-command-keys
"%s has auto save data; consider \\`M-x recover-this-file'")
(file-name-nondirectory buffer-file-name))
(setq not-serious t)
(if error "(New file)" nil)))