[elpa] externals/which-key 7e854d0 09/10: Fix recent commit

[Stefan Monnier]

branch: externals/which-key
commit 7e854d02037c8ec84ac26bb77b98f670d8d3eb2e
Author: Justin Burkett <justin@burkett.cc>
Commit: Justin Burkett <justin@burkett.cc>

    Fix recent commit
---
 which-key.el | 4 +---
 1 file changed, 1 insertion(+), 3 deletions(-)

diff --git a/which-key.el b/which-key.el
index 2f89f40..d66cec5 100644
--- a/which-key.el
+++ b/which-key.el
@@ -1824,9 +1824,6 @@ ones. PREFIX is for internal use and should not be used."
                 (setq bindings
                       (append bindings
                               (which-key--get-keymap-bindings def t key))))
-               ((and def (consp def))
-                (cl-pushnew (cons key-desc (car def))
-                            bindings :test (lambda (a b) (string= (car a) (car 
b)))))
                (t
                 (when def
                   (cl-pushnew
@@ -1838,6 +1835,7 @@ ones. PREFIX is for internal use and should not be used."
                           ((eq 'menu-item (car-safe def)) "menu-item")
                           ((stringp def) def)
                           ((vectorp def) (key-description def))
+                          ((consp def) (car def))
                           (t "unknown")))
                    bindings :test (lambda (a b) (string= (car a) (car 
b)))))))))
      keymap)