diff options
| author | Stefan Kangas <stefan@marxist.se> | 2021-09-18 14:54:04 +0200 |
|---|---|---|
| committer | Stefan Kangas <stefan@marxist.se> | 2021-09-18 23:26:18 +0200 |
| commit | ec0527d8e9a7f12898c8fe9fdb6daec21c1d2ba8 (patch) | |
| tree | 4467c88ec037717d65e30fdd659e47f633ceb1cb /lisp/emacs-lisp/checkdoc.el | |
| parent | 4b3dc7a139c426bad52d3aa145b4868c9b44a325 (diff) | |
| download | emacs-ec0527d8e9a7f12898c8fe9fdb6daec21c1d2ba8.tar.gz | |
Use command substitution for exit-recursive-edit
* lisp/bindings.el (mode-line-modes):
* lisp/emacs-lisp/checkdoc.el (checkdoc-recursive-edit): Use command
substitution for 'exit-recursive-edit'.
Diffstat (limited to 'lisp/emacs-lisp/checkdoc.el')
| -rw-r--r-- | lisp/emacs-lisp/checkdoc.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/checkdoc.el b/lisp/emacs-lisp/checkdoc.el index 9a37941313e..099b1585537 100644 --- a/lisp/emacs-lisp/checkdoc.el +++ b/lisp/emacs-lisp/checkdoc.el @@ -828,7 +828,8 @@ MSG is the error that was found, which is displayed in a help buffer." "\n\nEdit to fix this problem, and press C-M-c to continue."))) (shrink-window-if-larger-than-buffer (get-buffer-window "*Checkdoc Help*")) - (message "When you're done editing press C-M-c to continue.") + (message (substitute-command-keys + "When you're done editing press \\[exit-recursive-edit] to continue.")) (unwind-protect (recursive-edit) (if (get-buffer-window "*Checkdoc Help*") |