[elpa] externals/transient 9e30038d2d 051/366: transient-set-level: Limit when it is called

[Jonas Bernoulli]

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

    transient-set-level: Limit when it is called
    
    Only arrange for `transient-set-level' to be called if
    `transient-suffix-object' actually returns an object.  This prevents
    users from setting the level of commands shared between all suffixes.
    Setting the level for such a command wouldn't have an effect and some
    of them are useful while setting the levels for other commands, e.g.
    the scroll commands.
    
    Closes #29.
---
 lisp/transient.el | 1 +
 1 file changed, 1 insertion(+)

diff --git a/lisp/transient.el b/lisp/transient.el
index 6b41acd971..7aaf1659fd 100644
--- a/lisp/transient.el
+++ b/lisp/transient.el
@@ -1496,6 +1496,7 @@ EDIT may be non-nil."
      (t
       (setq this-command 'transient-undefined))))
    ((and transient--editp
+         (transient-suffix-object)
          (not (memq this-command '(transient-quit-one
                                    transient-quit-all
                                    transient-help))))