1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-03 02:31:03 -08:00

(make-autoload): Use new arg.

This commit is contained in:
Stefan Monnier 2006-07-17 21:27:17 +00:00
parent d54fbdfd31
commit fb2dd97003
2 changed files with 17 additions and 1 deletions

View file

@ -1,5 +1,18 @@
2006-07-17 Stefan Monnier <monnier@iro.umontreal.ca> 2006-07-17 Stefan Monnier <monnier@iro.umontreal.ca>
* emacs-lisp/autoload.el (make-autoload): Use new arg.
* custom.el (custom-autoload): Add `noset' argument.
(custom-push-theme): Don't autoload the variable, let callers do it.
(custom-theme-set-variables): Autoload the variable if necessary.
* cus-edit.el (custom-variable-state-set): If the variable was
originally set outside custom, but to the same value as the default,
consider it to be standard.
* Makefile.in (mh-loaddefs.el): Finish setting up the default empty
file *before* telling Emacs to add the autoloads, in case it fails.
* progmodes/sh-script.el (sh-quoted-subshell): Don't match escaped `. * progmodes/sh-script.el (sh-quoted-subshell): Don't match escaped `.
Use `cond', push', and `dolist'. Use `cond', push', and `dolist'.

View file

@ -124,7 +124,10 @@ or macro definition or a defcustom)."
) )
`(progn `(progn
(defvar ,varname ,init ,doc) (defvar ,varname ,init ,doc)
(custom-autoload ',varname ,file)))) (custom-autoload ',varname ,file
,(condition-case nil
(null (cadr (memq :set form)))
(error nil))))))
((eq car 'defgroup) ((eq car 'defgroup)
;; In Emacs this is normally handled separately by cus-dep.el, but for ;; In Emacs this is normally handled separately by cus-dep.el, but for