From 4839b42a16635a3090f4fb374fb1fbe532ef0451 Mon Sep 17 00:00:00 2001 From: Stefan Kangas Date: Sun, 2 Oct 2022 17:52:05 +0200 Subject: [PATCH] * lisp/files.el (after-find-file): Use substitute-command-keys. --- lisp/files.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/lisp/files.el b/lisp/files.el index 10b156fb306..40ad11ecfc4 100644 --- a/lisp/files.el +++ b/lisp/files.el @@ -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)))