* lisp/emacs-lisp/cl-generic.el (cl-defgeneric): Fix last change

2017-02-21 21:32:27 -05:00 · 2017-02-21 21:32:27 -05:00 · 3f1cd957ff
commit 3f1cd957ff
parent cd191c8034
1 changed files with 1 additions and 1 deletions
--- 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))))