diff options
| author | Lars Ingebrigtsen | 2019-07-09 16:43:02 +0200 |
|---|---|---|
| committer | Lars Ingebrigtsen | 2019-07-09 17:13:54 +0200 |
| commit | f3bd296a3e00628793d1c2f22f13e81700cbb14d (patch) | |
| tree | c14a93eec8857ae158ff821af1c8aa3e83ea7b9a | |
| parent | c9142f414bfd5fe10977353361e7b2a6330a6260 (diff) | |
| download | emacs-f3bd296a3e00628793d1c2f22f13e81700cbb14d.tar.gz emacs-f3bd296a3e00628793d1c2f22f13e81700cbb14d.zip | |
Make two variables for extended command suggestions mention each other
* lisp/simple.el (suggest-key-bindings):
(extended-command-suggest-shorter): Mention each other, because
they are vaguely related (bug#35309).
| -rw-r--r-- | lisp/simple.el | 8 |
1 files changed, 6 insertions, 2 deletions
diff --git a/lisp/simple.el b/lisp/simple.el index 5f27b75a4c7..983a3b6973d 100644 --- a/lisp/simple.el +++ b/lisp/simple.el | |||
| @@ -1784,14 +1784,18 @@ to get different commands to edit and resubmit." | |||
| 1784 | (defcustom suggest-key-bindings t | 1784 | (defcustom suggest-key-bindings t |
| 1785 | "Non-nil means show the equivalent key-binding when M-x command has one. | 1785 | "Non-nil means show the equivalent key-binding when M-x command has one. |
| 1786 | The value can be a length of time to show the message for. | 1786 | The value can be a length of time to show the message for. |
| 1787 | If the value is non-nil and not a number, we wait 2 seconds." | 1787 | If the value is non-nil and not a number, we wait 2 seconds. |
| 1788 | |||
| 1789 | Also see `extended-command-suggest-shorter'." | ||
| 1788 | :group 'keyboard | 1790 | :group 'keyboard |
| 1789 | :type '(choice (const :tag "off" nil) | 1791 | :type '(choice (const :tag "off" nil) |
| 1790 | (integer :tag "time" 2) | 1792 | (integer :tag "time" 2) |
| 1791 | (other :tag "on"))) | 1793 | (other :tag "on"))) |
| 1792 | 1794 | ||
| 1793 | (defcustom extended-command-suggest-shorter t | 1795 | (defcustom extended-command-suggest-shorter t |
| 1794 | "If non-nil, show a shorter M-x invocation when there is one." | 1796 | "If non-nil, show a shorter M-x invocation when there is one. |
| 1797 | |||
| 1798 | Also see `suggest-key-bindings'." | ||
| 1795 | :group 'keyboard | 1799 | :group 'keyboard |
| 1796 | :type 'boolean | 1800 | :type 'boolean |
| 1797 | :version "26.1") | 1801 | :version "26.1") |