From 06beea21caf9edf2cf992cff77988063fd848014 Mon Sep 17 00:00:00 2001
From: "Richard M. Stallman" <rms@gnu.org>
Date: Fri, 24 Apr 1998 21:05:18 +0000
Subject: (custom-make-dependencies): Don't give up on a whole file, the first
 time eval gets an error.

---
 lisp/cus-dep.el | 7 +++++--
 1 file changed, 5 insertions(+), 2 deletions(-)

(limited to 'lisp/cus-dep.el')

diff --git a/lisp/cus-dep.el b/lisp/cus-dep.el
index 286d4830fa8..006197aa3ab 100644
--- a/lisp/cus-dep.el
+++ b/lisp/cus-dep.el
@@ -56,8 +56,11 @@ Usage: emacs -batch -l ./cus-dep.el -f custom-make-dependencies DIRS"
 					    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...")
-- 
cgit v1.2.1