[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
master 55932a65ed: Temporarily fix the oclosure bootstrap
From: |
Po Lu |
Subject: |
master 55932a65ed: Temporarily fix the oclosure bootstrap |
Date: |
Tue, 29 Mar 2022 02:00:17 -0400 (EDT) |
branch: master
commit 55932a65ed719d4277e0e781ca5e323b189d7f63
Author: Po Lu <luangruo@yahoo.com>
Commit: Po Lu <luangruo@yahoo.com>
Temporarily fix the oclosure bootstrap
* lisp/emacs-lisp/oclosure.el (oclosure-define): Load oclosure
from source if `oclosure--define' is not defined during byte
compilation.
---
lisp/emacs-lisp/oclosure.el | 2 ++
1 file changed, 2 insertions(+)
diff --git a/lisp/emacs-lisp/oclosure.el b/lisp/emacs-lisp/oclosure.el
index 3d17c6c668..0c504e5d82 100644
--- a/lisp/emacs-lisp/oclosure.el
+++ b/lisp/emacs-lisp/oclosure.el
@@ -248,6 +248,8 @@ list of slot properties. The currently known properties
are the following:
,(when options (macroexp-warn-and-return name
(format "Ignored options: %S" options)
nil))
+ (eval-when-compile (unless (fboundp 'oclosure--define)
+ (load "oclosure.el")))
(eval-and-compile
(oclosure--define ',name ,docstring ',parent-names ',slots
,@(when predicate `(:predicate ',predicate))))
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- master 55932a65ed: Temporarily fix the oclosure bootstrap,
Po Lu <=