[elpa] externals/transient e17e2b2 2/3: transient-show-help: Tweak self-suffixes

[Jonas Bernoulli]

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

    transient-show-help: Tweak self-suffixes
    
    If a command is called as a suffix of itself, then show the function
    definition instead of the man-page as we usually do for prefixes.
---
 lisp/transient.el | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/lisp/transient.el b/lisp/transient.el
index a04d957..4cbc421 100644
--- a/lisp/transient.el
+++ b/lisp/transient.el
@@ -3265,7 +3265,8 @@ Show the first one that is specified."
           (transient--show-manpage manpage)
         (transient--describe-function (oref transient--prefix command)))
     (if-let ((prefix (get (transient--suffix-command obj) 'transient--prefix))
-             (manpage (oref prefix man-page)))
+             (manpage (oref prefix man-page))
+             (_ (not (eq this-command (oref transient--prefix command)))))
         (transient--show-manpage manpage)
       (transient--describe-function this-original-command))))