[elpa] externals/transient 3657117b14 2/7: transient--parse-suffix: Detect when mandatory command is missing

[Jonas Bernoulli]

branch: externals/transient
commit 3657117b147b589fe3e27d2a8e6d24fcb0fc1137
Author: Jonas Bernoulli <jonas@bernoul.li>
Commit: Jonas Bernoulli <jonas@bernoul.li>

    transient--parse-suffix: Detect when mandatory command is missing
    
    This is the only value that must be specified using a positional
    value as opposed to a keyword value.
    
    Closes #234.
---
 lisp/transient.el | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/lisp/transient.el b/lisp/transient.el
index 8beb5577b8..f5a7992907 100644
--- a/lisp/transient.el
+++ b/lisp/transient.el
@@ -1051,12 +1051,13 @@ example, sets a variable, use `transient-define-infix' 
instead.
             (eq (car-safe car) 'lambda))
         (setq args (plist-put args :description pop)))
        ((and (symbolp car)
+             (not (keywordp car))
              (not (commandp car))
              (commandp (cadr spec)))
         (setq args (plist-put args :description (macroexp-quote pop)))))
       (cond
        ((keywordp car)
-        (error "Need command, got %S" car))
+        (error "Need command, got `%s'" car))
        ((symbolp car)
         (setq args (plist-put args :command (macroexp-quote pop))))
        ((and (commandp car)