[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/compat e82848d4bf 3/3: Rename variable
From: |
ELPA Syncer |
Subject: |
[elpa] externals/compat e82848d4bf 3/3: Rename variable |
Date: |
Tue, 17 Jan 2023 04:57:27 -0500 (EST) |
branch: externals/compat
commit e82848d4bf5c6bbc793c8c4c4268358d70f5edbf
Author: Daniel Mendler <mail@daniel-mendler.de>
Commit: Daniel Mendler <mail@daniel-mendler.de>
Rename variable
---
compat-macs.el | 6 +++---
1 file changed, 3 insertions(+), 3 deletions(-)
diff --git a/compat-macs.el b/compat-macs.el
index 83eec3f57d..decd246981 100644
--- a/compat-macs.el
+++ b/compat-macs.el
@@ -71,15 +71,15 @@ ARGS is a list of keywords which are looked up and passed
to FUN."
(let* ((body (compat--check-attributes attrs `(,@args :when :feature)))
(feature (plist-get attrs :feature))
(attrs `(:body ,body ,@attrs))
- (cond (plist-get attrs :when)))
+ (when (plist-get attrs :when)))
;; Require feature at compile time
(when feature
(when (eq feature 'subr-x)
(error "Feature subr-x must not be specified"))
(require feature))
- (when (if cond
+ (when (if when
;; If a condition is specified, no version check is performed.
- (eval cond t)
+ (eval when t)
;; The current Emacs must be older than the current declared Compat
;; version, see `compat-declare-version'.
(version< emacs-version compat--version))