Mercurial > emacs
changeset 21755:44c9237d9e52
(custom-make-dependencies): Don't give up
on a whole file, the first time eval gets an error.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Fri, 24 Apr 1998 21:05:18 +0000 |
| parents | 14ad51433254 |
| children | ed07a8592f60 |
| files | lisp/cus-dep.el |
| diffstat | 1 files changed, 5 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/cus-dep.el Fri Apr 24 20:58:03 1998 +0000 +++ b/lisp/cus-dep.el Fri Apr 24 21:05:18 1998 +0000 @@ -56,8 +56,11 @@ nil t) (beginning-of-line) (let ((expr (read (current-buffer)))) - (eval expr) - (put (nth 1 expr) 'custom-where name))) + (condition-case nil + (progn + (eval expr) + (put (nth 1 expr) 'custom-where name)) + (error nil)))) (error nil))))) (setq all-subdirs (cdr all-subdirs))))) (message "Generating cus-load.el...")