diff options
| author | Juri Linkov | 2021-01-19 20:27:29 +0200 |
|---|---|---|
| committer | Juri Linkov | 2021-01-19 20:27:29 +0200 |
| commit | eec059b124ed57956cf896904ef8240b24cc7ead (patch) | |
| tree | 3491643d26a39c1ed5ba69232629571660492a66 | |
| parent | e718d3a84920f545b6a3540a3ba9c2ccd7eefdf7 (diff) | |
| download | emacs-eec059b124ed57956cf896904ef8240b24cc7ead.tar.gz emacs-eec059b124ed57956cf896904ef8240b24cc7ead.zip | |
* lisp/help-fns.el: Move defvar keymap-name-history closer to where it's used.
| -rw-r--r-- | lisp/help-fns.el | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/help-fns.el b/lisp/help-fns.el index 7be2826361c..da905192467 100644 --- a/lisp/help-fns.el +++ b/lisp/help-fns.el | |||
| @@ -76,9 +76,6 @@ frame.") | |||
| 76 | ;; costly, really). | 76 | ;; costly, really). |
| 77 | "Radix-tree representation replacing `definition-prefixes'.") | 77 | "Radix-tree representation replacing `definition-prefixes'.") |
| 78 | 78 | ||
| 79 | (defvar keymap-name-history nil | ||
| 80 | "History for input to `describe-keymap'.") | ||
| 81 | |||
| 82 | (defun help-definition-prefixes () | 79 | (defun help-definition-prefixes () |
| 83 | "Return the up-to-date radix-tree form of `definition-prefixes'." | 80 | "Return the up-to-date radix-tree form of `definition-prefixes'." |
| 84 | (when (> (hash-table-count definition-prefixes) 0) | 81 | (when (> (hash-table-count definition-prefixes) 0) |
| @@ -1656,6 +1653,9 @@ in `describe-keymap'. See also `Searching the Active Keymaps'." | |||
| 1656 | (get-char-property (point) 'local-map) | 1653 | (get-char-property (point) 'local-map) |
| 1657 | (current-local-map))))) | 1654 | (current-local-map))))) |
| 1658 | 1655 | ||
| 1656 | (defvar keymap-name-history nil | ||
| 1657 | "History for input to `describe-keymap'.") | ||
| 1658 | |||
| 1659 | ;;;###autoload | 1659 | ;;;###autoload |
| 1660 | (defun describe-keymap (keymap) | 1660 | (defun describe-keymap (keymap) |
| 1661 | "Describe key bindings in KEYMAP. | 1661 | "Describe key bindings in KEYMAP. |