[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/transient af7fe42bd4: transient--parse-suffix: Don't tr
From: |
Jonas Bernoulli |
Subject: |
[elpa] externals/transient af7fe42bd4: transient--parse-suffix: Don't try to evaluate closures again |
Date: |
Mon, 1 May 2023 06:39:56 -0400 (EDT) |
branch: externals/transient
commit af7fe42bd46e24ca7852e73bd1691015c5bd2151
Author: Jonas Bernoulli <jonas@bernoul.li>
Commit: Jonas Bernoulli <jonas@bernoul.li>
transient--parse-suffix: Don't try to evaluate closures again
Closes #244.
---
lisp/transient.el | 3 ++-
1 file changed, 2 insertions(+), 1 deletion(-)
diff --git a/lisp/transient.el b/lisp/transient.el
index 5c1b0a2ccf..952cfb8233 100644
--- a/lisp/transient.el
+++ b/lisp/transient.el
@@ -1071,7 +1071,8 @@ example, sets a variable, use `transient-define-infix'
instead.
(if (and desc (or (stringp desc) (symbolp desc)))
desc
(plist-get args :key)))))))
- (setq args (plist-put args :command `(defalias ',sym ,cmd)))))
+ (setq args (plist-put args :command
+ `(defalias ',sym ,(macroexp-quote cmd))))))
((or (stringp car)
(and car (listp car)))
(let ((arg pop))
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [elpa] externals/transient af7fe42bd4: transient--parse-suffix: Don't try to evaluate closures again,
Jonas Bernoulli <=