changeset 17473:83503d0dc576

Fixed generation of empty dependencies lists.
author Per Abrahamsen <abraham@dina.kvl.dk>
date Tue, 15 Apr 1997 11:13:24 +0000
parents c7a720ef31e6
children 90cfef3930bc
files lisp/cus-dep.el
diffstat 1 files changed, 3 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/cus-dep.el	Tue Apr 15 10:39:07 1997 +0000
+++ b/lisp/cus-dep.el	Tue Apr 15 11:13:24 1997 +0000
@@ -58,9 +58,10 @@
 			  (insert " ")
 			(insert "(put '" (symbol-name symbol) 
 				" 'custom-loads '("))
-		      (insert (prin1-to-string where))
+		      (prin1 where (current-buffer))
 		      (push where found)))
-		  (insert "))\n")))))
+		  (when found
+		    (insert "))\n"))))))
   (insert "\n;;; cus-load.el ends here\n")
   (save-buffer)
   (message "Generating cus-load.el..."))