branch: externals/transient
commit dd8c2999b1e3ca93e6fd7d171e38da2cc57eea90
Author: Jonas Bernoulli <[email protected]>
Commit: Jonas Bernoulli <[email protected]>
transient--parse-suffix: Fix b54af9e4
---
lisp/transient.el | 7 ++++---
1 file changed, 4 insertions(+), 3 deletions(-)
diff --git a/lisp/transient.el b/lisp/transient.el
index c7358f99a8..a62d749f86 100644
--- a/lisp/transient.el
+++ b/lisp/transient.el
@@ -1191,9 +1191,10 @@ commands are aliases for."
(not (stringp car)))
(let ((cmd pop)
(sym (intern
- (format "transient:%s:%s:%d" prefix
- (replace-in-string (plist-get args :key) " " "")
- (prog1 gensym-counter (cl-incf gensym-counter))))))
+ (format
+ "transient:%s:%s:%d" prefix
+ (replace-regexp-in-string (plist-get args :key) " " "")
+ (prog1 gensym-counter (cl-incf gensym-counter))))))
(setq args (plist-put
args :command
`(prog1 ',sym
