Make which-key descriptions respect the users leader key.
This commit is contained in:
parent
0f979d3cea
commit
2e48e5568a
|
@ -3449,9 +3449,10 @@ one of `l' or `r'."
|
||||||
;; ensure the target matches the whole string
|
;; ensure the target matches the whole string
|
||||||
(push (cons (concat "\\`" (car nd) "\\'") (cdr nd))
|
(push (cons (concat "\\`" (car nd) "\\'") (cdr nd))
|
||||||
which-key-description-replacement-alist)))
|
which-key-description-replacement-alist)))
|
||||||
|
(dolist (leader-key `(,dotspacemacs-leader-key ,dotspacemacs-emacs-leader-key))
|
||||||
(which-key-add-key-based-replacements
|
(which-key-add-key-based-replacements
|
||||||
"SPC m" "maj mode cmds"
|
(concat leader-key " m") "maj mode cmds"
|
||||||
(concat "SPC " dotspacemacs-command-key) "M-x")
|
(concat leader-key " " dotspacemacs-command-key) "M-x"))
|
||||||
;; disable special key handling for spacemacs, since it can be
|
;; disable special key handling for spacemacs, since it can be
|
||||||
;; disorienting if you don't understand it
|
;; disorienting if you don't understand it
|
||||||
(setq which-key-special-keys nil)
|
(setq which-key-special-keys nil)
|
||||||
|
|
Loading…
Reference in a new issue