summaryrefslogtreecommitdiff
path: root/lisp/emacs-lisp/oclosure.el
diff options
context:
space:
mode:
Diffstat (limited to 'lisp/emacs-lisp/oclosure.el')
-rw-r--r--lisp/emacs-lisp/oclosure.el2
1 files changed, 2 insertions, 0 deletions
diff --git a/lisp/emacs-lisp/oclosure.el b/lisp/emacs-lisp/oclosure.el
index 3d17c6c668c..0c504e5d821 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))))