mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-24 14:30:43 -08:00
Code Issues Projects Releases Wiki 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
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'." or `easy-mmode-define-minor-mode'."
(let ((car (car-safe form))) (let ((car (car-safe form)))
(if (memq car '(defun define-skeleton defmacro define-derived-mode (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)) (let ((macrop (eq car 'defmacro))
name doc) name doc)
(setq form (cdr form) (setq form (cdr form)