From 3c7ecc69d48258af66978a685aedcbc8d1ada512 Mon Sep 17 00:00:00 2001 From: Justin Burkett Date: Wed, 15 Mar 2017 13:55:01 -0400 Subject: [PATCH] Fix replacement of keys when prefix is nil The prefix is nil at the top-level keymap Fixes #163 --- which-key.el | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/which-key.el b/which-key.el index e9c2170ebdd..cc3cc0dc81c 100644 --- a/which-key.el +++ b/which-key.el @@ -1459,7 +1459,10 @@ alists. Returns a list (key separator description)." (let* ((key (car key-binding)) (orig-desc (cdr key-binding)) (group (which-key--group-p orig-desc)) - (keys (concat (which-key--current-key-string) " " key)) + ;; At top-level prefix is nil + (keys (if which-key--current-prefix + (concat (which-key--current-key-string) " " key) + key)) (local (eq (which-key--safe-lookup-key local-map (kbd keys)) (intern orig-desc))) (hl-face (which-key--highlight-face orig-desc))