[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/consult c2858a52a1 2/2: consult-kmacro: Use version che
From: |
ELPA Syncer |
Subject: |
[elpa] externals/consult c2858a52a1 2/2: consult-kmacro: Use version check |
Date: |
Tue, 31 Jan 2023 05:57:25 -0500 (EST) |
branch: externals/consult
commit c2858a52a186e71078b4d3a0116344702c470f01
Author: Daniel Mendler <mail@daniel-mendler.de>
Commit: Daniel Mendler <mail@daniel-mendler.de>
consult-kmacro: Use version check
---
consult-kmacro.el | 4 +++-
1 file changed, 3 insertions(+), 1 deletion(-)
diff --git a/consult-kmacro.el b/consult-kmacro.el
index b6d6430be8..8c043e0f69 100644
--- a/consult-kmacro.el
+++ b/consult-kmacro.el
@@ -83,7 +83,9 @@ Macros containing mouse clicks are omitted."
(unless km (user-error "No kmacro selected"))
(funcall
;; Kmacros are lambdas (oclosures) on Emacs 29
- (if (fboundp 'kmacro-lambda-form) (kmacro-lambda-form km) km)
+ (if (eval-when-compile (> emacs-major-version 28))
+ km
+ (kmacro-lambda-form km))
arg)))
(provide 'consult-kmacro)