[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
master db09267 2/2: ; Fix recent obsoletion warning in cl.el.
|
From: |
Basil L. Contovounesios |
|
Subject: |
master db09267 2/2: ; Fix recent obsoletion warning in cl.el. |
|
Date: |
Wed, 24 Feb 2021 17:38:15 -0500 (EST) |
branch: master
commit db09267de338461d7f3dcddba61d1b8904e7259e
Author: Basil L. Contovounesios <contovob@tcd.ie>
Commit: Basil L. Contovounesios <contovob@tcd.ie>
; Fix recent obsoletion warning in cl.el.
---
lisp/obsolete/cl.el | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/lisp/obsolete/cl.el b/lisp/obsolete/cl.el
index f91cfaa..09f9ab7 100644
--- a/lisp/obsolete/cl.el
+++ b/lisp/obsolete/cl.el
@@ -438,7 +438,7 @@ definitions, or lack thereof).
(let ((func `(cl-function
(lambda ,(cadr x)
(cl-block ,(car x) ,@(cddr x))))))
- (when (cl--compiling-file)
+ (when (macroexp-compiling-p)
;; Bug#411. It would be nice to fix this.
(and (get (car x) 'byte-compile)
(error "Byte-compiling a redefinition of `%s' \