mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-02-04 20:27:45 +00:00
Code Issues Releases Activity

(make-autoload): Handle defun* like defun.

Browse Source
This commit is contained in:
Richard M. Stallman 1999-09-03 23:57:31 +00:00
parent aaaecdf3ea
commit 74a28ee2a8
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
lisp/emacs-lisp/autoload.el
View File

@ -67,7 +67,8 @@ Returns nil if FORM is not a `defun', `define-skeleton',
or `easy-mmode-define-minor-mode'."
(let ((car (car-safe form)))
(if (memq car '(defun define-skeleton defmacro define-derived-mode
define-generic-mode easy-mmode-define-minor-mode))
define-generic-mode easy-mmode-define-minor-mode
defun*))
(let ((macrop (eq car 'defmacro))
name doc)
(setq form (cdr form)