[gnu] externals/keymap-popup 4130d1fa95: annotate: generalize atom check in parse-entry

[ELPA Syncer]

branch: externals/keymap-popup
commit 4130d1fa958eeff2d677ad1e326b18ddb77bebb4
Author: Thanos Apollo <pub...@thanosapollo.org>
Commit: Thanos Apollo <pub...@thanosapollo.org>

    annotate: generalize atom check in parse-entry
---
 keymap-popup.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/keymap-popup.el b/keymap-popup.el
index d6059f8109..b8bb373239 100644
--- a/keymap-popup.el
+++ b/keymap-popup.el
@@ -184,8 +184,8 @@ annotated entries.  SPEC is (DESCRIPTION COMMAND-OR-TYPE 
&rest PROPS)
 for key-based entries, or (DESCRIPTION &rest PROPS) for annotated ones."
   (if (symbolp key)
       ;; Annotated entry: key is a command symbol, spec is (DESC . PROPS),
-      ;; a bare string, or a bare lambda/function form.
-      (let* ((spec (cond ((stringp spec) (list spec))
+      ;; any atom, or a bare lambda/function form.
+      (let* ((spec (cond ((not (consp spec)) (list spec))
                          ((memq (car-safe spec) '(lambda function)) (list 
spec))
                          (t spec)))
              (description (car spec))