]> code.delx.au - gnu-emacs/blobdiff - lisp/emacs-lisp/eieio-compat.el
Fix recent bootstrap problems
[gnu-emacs] / lisp / emacs-lisp / eieio-compat.el
index 0283704e033231ea1571c188bc5f85b9e1f62ebb..386ff2f744980861a0ae63b0da786e085c802400 100644 (file)
@@ -138,7 +138,7 @@ Summary:
   (cl-generic-make-generalizer
    ;; Give it a slightly higher priority than `subclass' so that the
    ;; interleaved list comes before subclass's non-interleaved list.
-   61 (lambda (name) `(and (symbolp ,name) (eieio--class-v ,name)))
+   61 (lambda (name) `(and (symbolp ,name) (cl--find-class ,name)))
    #'eieio--generic-static-symbol-specializers))
 (defconst eieio--generic-static-object-generalizer
   (cl-generic-make-generalizer