From c37bdd00c7dcabaa3ca8405d9dc5122ed36f27e0 Mon Sep 17 00:00:00 2001 From: "Charles A. Roelli" Date: Sat, 9 Mar 2019 16:47:38 +0100 Subject: [PATCH] Make help for file supersession more readable * lisp/userlock.el (ask-user-about-supersession-help): Use 'substitute-command-keys' to show the command key for "\\[revert-buffer]" properly. --- lisp/userlock.el | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) diff --git a/lisp/userlock.el b/lisp/userlock.el index 1a1adebdde9..f077bc9ad62 100644 --- a/lisp/userlock.el +++ b/lisp/userlock.el @@ -174,7 +174,9 @@ really edit the buffer? (y, n, r or C-h) " (defun ask-user-about-supersession-help () (with-output-to-temp-buffer "*Help*" - (princ "You want to modify a buffer whose disk file has changed + (princ + (substitute-command-keys + "You want to modify a buffer whose disk file has changed since you last read it in or saved it with this buffer. If you say `y' to go ahead and modify this buffer, @@ -184,7 +186,7 @@ from the file on disk. If you say `n', the change you started to make will be aborted. Usually, you should type `n' and then `\\[revert-buffer]', -to get the latest version of the file, then make the change again.") +to get the latest version of the file, then make the change again.")) (with-current-buffer standard-output (help-mode)))) -- 2.39.5