summaryrefslogtreecommitdiff
path: root/lisp/userlock.el
diff options
context:
space:
mode:
authorCharles A. Roelli <charles@aurox.ch>2019-03-09 16:47:38 +0100
committerCharles A. Roelli <charles@aurox.ch>2019-03-09 16:47:38 +0100
commitc37bdd00c7dcabaa3ca8405d9dc5122ed36f27e0 (patch)
tree7c0ae84db94abf806f9705f905b340c5e794cdb6 /lisp/userlock.el
parentfddb915d234515af81dce30982a8dd22568b4e84 (diff)
downloademacs-c37bdd00c7dcabaa3ca8405d9dc5122ed36f27e0.tar.gz
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.
Diffstat (limited to 'lisp/userlock.el')
-rw-r--r--lisp/userlock.el6
1 files 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))))