emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/transient f2314ba2a4 059/366: transient-infix-set: Sile


From: Jonas Bernoulli
Subject: [elpa] externals/transient f2314ba2a4 059/366: transient-infix-set: Silence byte-compiler
Date: Tue, 25 Jan 2022 18:54:26 -0500 (EST)

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

    transient-infix-set: Silence byte-compiler
---
 lisp/transient.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/lisp/transient.el b/lisp/transient.el
index 08dc9b8b94..bc2c97a624 100644
--- a/lisp/transient.el
+++ b/lisp/transient.el
@@ -2192,7 +2192,7 @@ commands."
            (spec (oref transient--prefix incompatible))
            (incomp (remove arg (cl-find-if (lambda (elt) (member arg elt)) 
spec))))
       (progn
-        (cl-call-next-method)
+        (cl-call-next-method obj value)
         (dolist (arg incomp)
           (when-let ((obj (cl-find-if (lambda (obj)
                                         (and (slot-boundp obj 'argument)
@@ -2200,7 +2200,7 @@ commands."
                                       transient--suffixes)))
             (let ((transient--unset-incompatible nil))
               (transient-infix-set obj nil)))))
-    (cl-call-next-method)))
+    (cl-call-next-method obj value)))
 
 (cl-defmethod transient-set-value ((obj transient-prefix))
   (oset (oref obj prototype) value (transient-args))



reply via email to

[Prev in Thread] Current Thread [Next in Thread]