[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[nongnu] elpa/helm 89baca1f84: Fix kmacro for emacs-29+ which uses closu
From: |
ELPA Syncer |
Subject: |
[nongnu] elpa/helm 89baca1f84: Fix kmacro for emacs-29+ which uses closures |
Date: |
Thu, 12 Oct 2023 13:01:06 -0400 (EDT) |
branch: elpa/helm
commit 89baca1f8449baf4de99eaa799773417fcbae4f1
Author: Thierry Volpiatto <thievol@posteo.net>
Commit: Thierry Volpiatto <thievol@posteo.net>
Fix kmacro for emacs-29+ which uses closures
instead of lists.
---
helm-ring.el | 11 ++++++++---
1 file changed, 8 insertions(+), 3 deletions(-)
diff --git a/helm-ring.el b/helm-ring.el
index 56d67f587c..11005a1f82 100644
--- a/helm-ring.el
+++ b/helm-ring.el
@@ -535,9 +535,14 @@ See (info \"(emacs) Keyboard Macros\") for detailed infos."
:multiline t
:candidate-transformer
(lambda (candidates)
- (cl-loop for c in candidates collect
- (propertize (help-key-description (car c) nil)
- 'helm-realvalue c)))
+ (cl-loop for c in candidates
+ for keys = (if (functionp c)
+ ;; Emacs-29+ (closure).
+ (kmacro--keys c)
+ ;; Emacs-28 and below (list).
+ (car c))
+ collect (propertize (help-key-description keys nil)
+ 'helm-realvalue c)))
:persistent-action 'ignore
:persistent-help "Do nothing"
:help-message 'helm-kmacro-help-message
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [nongnu] elpa/helm 89baca1f84: Fix kmacro for emacs-29+ which uses closures,
ELPA Syncer <=