mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-15 10:30:25 -08:00
Code Issues Projects Releases Wiki Activity

* lisp/emacs-lisp/eieio-compat.el (eieio--defgeneric-init-form):

Browse source 
Adjust to change in cl-generic-ensure-function.
This commit is contained in:
Stefan Monnier 2017-07-25 10:12:58 -04:00
parent ea5789dac3
commit 24b91584c2
1 changed files with 2 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

3
lisp/emacs-lisp/eieio-compat.el
View file

@ -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)