diff lisp/make-docfile.el @ 239:41f2f0e326e9 r20-5b18

Import from CVS: tag r20-5b18
author cvs
date Mon, 13 Aug 2007 10:15:48 +0200
parents 89ec2bb86eea
children 8efd647ea9ca
line wrap: on
line diff
--- a/lisp/make-docfile.el	Mon Aug 13 10:15:04 2007 +0200
+++ b/lisp/make-docfile.el	Mon Aug 13 10:15:48 2007 +0200
@@ -125,18 +125,18 @@
 		(setq processed (cons arg processed)))))
 	(setq site-load-packages (cdr site-load-packages)))))
 
-(let ((autoloads (packages-list-autoloads-path)))
-  ;; (print (concat "Autoloads: " (prin1-to-string autoloads)))
-  (while autoloads
-    (let ((arg (car autoloads)))
-      (if (null (member arg processed))
-	  (progn
-	    ;; (print arg)
-	    (if (and (null docfile-out-of-date)
-		     (file-newer-than-file-p arg docfile))
-		(setq docfile-out-of-date t))
-	    (setq processed (cons arg processed))))
-      (setq autoloads (cdr autoloads)))))
+;(let ((autoloads (packages-list-autoloads-path)))
+;  ;; (print (concat "Autoloads: " (prin1-to-string autoloads)))
+;  (while autoloads
+;    (let ((arg (car autoloads)))
+;      (if (null (member arg processed))
+;	  (progn
+;	    ;; (print arg)
+;	    (if (and (null docfile-out-of-date)
+;		     (file-newer-than-file-p arg docfile))
+;		(setq docfile-out-of-date t))
+;	    (setq processed (cons arg processed))))
+;      (setq autoloads (cdr autoloads)))))
 
 ;; Now fire up make-docfile and we're done