transient--parse-group: Cosmetics

magit · Oct 17, 2024 · b1acf76 · b1acf76
1 parent 4262c60
commit b1acf76
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/lisp/transient.el b/lisp/transient.el
@@ -1160,8 +1160,8 @@ commands are aliases for."
           (or level transient--default-child-level)
           (list 'quote
                 (cond (class)
-                      ((or (vectorp (car spec))
-                           (and (car spec) (symbolp (car spec))))
+                      ((cl-typep (car spec)
+                                 '(or vector (and symbol (not null))))
                        'transient-columns)
                       ('transient-column)))
           (and args (cons 'list args))