summaryrefslogtreecommitdiff
path: root/lisp/type-break.el
diff options
context:
space:
mode:
authorPaul Eggert <eggert@cs.ucla.edu>2015-08-21 14:08:47 -0700
committerPaul Eggert <eggert@cs.ucla.edu>2015-08-21 14:09:47 -0700
commitc1cacb09948928287bfc32745f2a92604d3291c4 (patch)
treeffda141622df981f55d25b8171fac6691a40f47f /lisp/type-break.el
parent59f7943043fa4afb922f4553c9994e20c534fc57 (diff)
downloademacs-c1cacb09948928287bfc32745f2a92604d3291c4.tar.gz
emacs-c1cacb09948928287bfc32745f2a92604d3291c4.tar.bz2
emacs-c1cacb09948928287bfc32745f2a92604d3291c4.zip
Avoid hard-coding "M-x command" in docstrings
* lisp/calendar/todo-mode.el (todo-mode): * lisp/desktop.el (desktop-save-mode): * lisp/edmacro.el (edit-kbd-macro): * lisp/emacs-lisp/package.el (package-menu-execute): * lisp/emulation/viper-cmd.el (viper-ask-level): * lisp/emulation/viper-init.el (viper-expert-level): * lisp/filesets.el (filesets-add-buffer): * lisp/follow.el (follow-mode): * lisp/gnus/auth-source.el (auth-sources): * lisp/international/ogonek.el (ogonek-informacja) (ogonek-information): * lisp/net/tramp.el (tramp-process-actions): * lisp/org/org-gnus.el (org-gnus-no-new-news): * lisp/org/org.el (org-ellipsis): * lisp/progmodes/python.el (python-shell-get-process-or-error): * lisp/progmodes/vhdl-mode.el (vhdl-mode): * lisp/server.el (server-start): * lisp/type-break.el (type-break-noninteractive-query): * lisp/userlock.el (ask-user-about-supersession-help): * lisp/whitespace.el (whitespace-report-region): Prefer (substitute-command-keys "`\\[foo-command]'") to "`M-x foo-command'" in docstrings and the like.
Diffstat (limited to 'lisp/type-break.el')
-rw-r--r--lisp/type-break.el5
1 files changed, 3 insertions, 2 deletions
diff --git a/lisp/type-break.el b/lisp/type-break.el
index 5a12f02f876..c7043b5c0e4 100644
--- a/lisp/type-break.el
+++ b/lisp/type-break.el
@@ -803,8 +803,9 @@ this or ask the user to start one right now."
(type-break-mode-line-message-mode)
(t
(beep t)
- (message "%sYou should take a typing break now. Do `M-x type-break'."
- (type-break-time-stamp))
+ (message "%sYou should take a typing break now. Do ā€˜%sā€™."
+ (type-break-time-stamp)
+ (substitute-command-keys "\\[type-break]"))
(sit-for 1)
(beep t)
;; return nil so query caller knows to reset reminder, as if user