Fix which-key labels for alt leader key #1332

Also mentioned in #1240
2019-04-15 15:39:33 -04:00 · 2019-04-15 15:39:33 -04:00 · 068a324fd1
commit 068a324fd1
parent 12161e1b67
1 changed files with 4 additions and 0 deletions
--- a/core/core-keybinds.el
+++ b/core/core-keybinds.el
@ -101,6 +101,10 @@ If any hook returns non-nil, all hooks after it are ignored.")
                       ,bdef)
                    forms))
            (when-let* ((desc (plist-get udef :which-key)))
+              (push `(which-key-add-key-based-replacements
+                       (general--concat t doom-leader-alt-key ,key)
+                       ,desc)
+                    wkforms)
              (push `(which-key-add-key-based-replacements
                       (general--concat t doom-leader-key ,key)
                       ,desc)