[elpa] externals/transient d11a1040b2 1/2: transient-update: Preserve universal argument

[Jonas Bernoulli]

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

    transient-update: Preserve universal argument
    
    Since [1: ed2febd0] we have already done so, iff we remapped from
    `negative-argument' to this command.
    
    Now we always preserve the universal argument.  This is necessary
    to pass such argument to suffix commands, which are bound to key
    sequences longer than one event.  In such cases there is an
    additional transient keymap, which binds the prefix key itself to
    `transient-update'.  Using that binding, causes an update of the
    transient buffer, before the key is unread so that it can be looked
    up in the transient keymap with the real suffix command bindings.
    
    Like any other command `transient-update' consumes the universal
    argument, and we have to set `prefix-arg' again, as if it were
    itself an universal argument command.
    
    1: 2022-04-24 ed2febd0056932689da00414af9db0260ea08ead
       Support use of an infix argument following a prefix argument
---
 lisp/transient.el | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

diff --git a/lisp/transient.el b/lisp/transient.el
index 67bcefd04b..1caec3e850 100644
--- a/lisp/transient.el
+++ b/lisp/transient.el
@@ -2583,8 +2583,7 @@ transient is active."
 (defun transient-update ()
   "Redraw the transient's state in the popup buffer."
   (interactive)
-  (when (equal this-original-command 'negative-argument)
-    (setq prefix-arg current-prefix-arg)))
+  (setq prefix-arg current-prefix-arg))
 
 (defun transient-show ()
   "Show the transient's state in the popup buffer."