aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorJuri Linkov2021-01-19 20:27:29 +0200
committerJuri Linkov2021-01-19 20:27:29 +0200
commiteec059b124ed57956cf896904ef8240b24cc7ead (patch)
tree3491643d26a39c1ed5ba69232629571660492a66
parente718d3a84920f545b6a3540a3ba9c2ccd7eefdf7 (diff)
downloademacs-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.el6
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.