mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-12-23 10:34:07 +00:00
Code Issues Releases Activity

(custom-make-dependencies): Bind to t around evaluating the def-form.

Browse Source
This commit is contained in:
Richard M. Stallman 2002-09-21 20:00:30 +00:00
parent 6da43544b7
commit 4e189812e9
2 changed files with 10 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
lisp/ChangeLog
View File

@ -1,3 +1,12 @@
2002-09-21 Richard M. Stallman <rms@gnu.org>
* cus-dep.el (custom-make-dependencies): Bind to t
around evaluating the def-form.
* custom.el (custom-dont-initialize): New variable.
(custom-declare-variable): Don't init the variable
if custom-dont-initialize is non-nil.
2002-09-21 John Paul Wallington <jpw@shootybangbang.com>
* net/eudc.el (eudc-install-menu): Use `define-key' and

2
lisp/cus-dep.el
View File

@ -66,7 +66,7 @@ Usage: emacs -batch -l ./cus-dep.el -f custom-make-dependencies DIRS"
(setq is-autoloaded t)))
(let ((expr (read (current-buffer))))
(condition-case nil
(progn
(let ((custom-dont-initialize t))
(eval expr)
(put (nth 1 expr) 'custom-autoloaded is-autoloaded)
(put (nth 1 expr) 'custom-where name))