From bac7de05e26dff44cd15d26f7f37fad1f8ce154b Mon Sep 17 00:00:00 2001 From: Stefan Monnier Date: Tue, 21 Feb 2017 13:51:12 -0500 Subject: * lisp/emacs-lisp/autoload.el (make-autoload): Support cl-defgeneric * lisp/emacs-lisp/cl-generic.el (cl-defgeneric): Tweak for autoloading. --- lisp/emacs-lisp/cl-generic.el | 5 +---- 1 file changed, 1 insertion(+), 4 deletions(-) (limited to 'lisp/emacs-lisp/cl-generic.el') diff --git a/lisp/emacs-lisp/cl-generic.el b/lisp/emacs-lisp/cl-generic.el index 6cc70c4c2f5..d9321b13565 100644 --- a/lisp/emacs-lisp/cl-generic.el +++ b/lisp/emacs-lisp/cl-generic.el @@ -233,6 +233,7 @@ DEFAULT-BODY, if present, is used as the body of a default method. ,(help-add-fundoc-usage doc args)) ,@(mapcar (lambda (method) `(cl-defmethod ,name ,@method)) (nreverse methods))) + :autoload-end ,@(mapcar (lambda (declaration) (let ((f (cdr (assq (car declaration) defun-declarations-alist)))) @@ -1215,9 +1216,5 @@ Used internally for the (major-mode MODE) context specializers." (progn (cl-assert (null modes)) mode) `(derived-mode ,mode . ,modes)))) -;; Local variables: -;; generated-autoload-file: "cl-loaddefs.el" -;; End: - (provide 'cl-generic) ;;; cl-generic.el ends here -- cgit v1.2.3