From 3f1cd957ff319ce4b2ae94d656c9c702fa9ce653 Mon Sep 17 00:00:00 2001 From: Stefan Monnier Date: Tue, 21 Feb 2017 21:32:27 -0500 Subject: [PATCH] * lisp/emacs-lisp/cl-generic.el (cl-defgeneric): Fix last change --- lisp/emacs-lisp/cl-generic.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lisp/emacs-lisp/cl-generic.el b/lisp/emacs-lisp/cl-generic.el index d9321b13565..b7695af32f6 100644 --- a/lisp/emacs-lisp/cl-generic.el +++ b/lisp/emacs-lisp/cl-generic.el @@ -231,9 +231,9 @@ DEFAULT-BODY, if present, is used as the body of a default method. (defalias ',name (cl-generic-define ',name ',args ',(nreverse options)) ,(help-add-fundoc-usage doc args)) + :autoload-end ,@(mapcar (lambda (method) `(cl-defmethod ,name ,@method)) (nreverse methods))) - :autoload-end ,@(mapcar (lambda (declaration) (let ((f (cdr (assq (car declaration) defun-declarations-alist)))) -- 2.39.5