[Emacs-diffs] master 24b9158: * lisp/emacs-lisp/eieio-compat.el (eieio--defgeneric-init-form):

[Stefan Monnier]

branch: master
commit 24b91584c214caadff0f2394cf1f021bf480b624
Author: Stefan Monnier <address@hidden>
Commit: Stefan Monnier <address@hidden>

    * lisp/emacs-lisp/eieio-compat.el (eieio--defgeneric-init-form):
    
    Adjust to change in cl-generic-ensure-function.
---
 lisp/emacs-lisp/eieio-compat.el | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/lisp/emacs-lisp/eieio-compat.el b/lisp/emacs-lisp/eieio-compat.el
index e6e6d11..8403a8a 100644
--- a/lisp/emacs-lisp/eieio-compat.el
+++ b/lisp/emacs-lisp/eieio-compat.el
@@ -165,7 +165,8 @@ Summary:
   (if (memq method '(no-next-method no-applicable-method))
       (symbol-function method)
     (let ((generic (cl-generic-ensure-function method)))
-      (symbol-function (cl--generic-name generic)))))
+      (or (symbol-function (cl--generic-name generic))
+          (cl--generic-make-function generic)))))
 
 ;;;###autoload
 (defun eieio--defmethod (method kind argclass code)