Check elinstall-proceed-p and *.el filename before doing autoloads.
authorTom Breton (Tehom) <tehom@panix.com>
Fri, 24 Dec 2010 20:49:09 +0000 (24 15:49 -0500)
committerTom Breton (Tehom) <tehom@panix.com>
Fri, 24 Dec 2010 20:49:09 +0000 (24 15:49 -0500)
elinstall.el

index d45f012..ca5e9f7 100644 (file)
@@ -1059,7 +1059,6 @@ Special variables are as noted in \"List of special variables\"."
         (and
            (file-readable-p full-path)
            (not (auto-save-file-name-p full-path)))
-        ;;$$IMPROVE ME Use more of the control variables.
         (let*
            (
               (visited (get-file-buffer full-path))
@@ -1080,9 +1079,16 @@ Special variables are as noted in \"List of special variables\"."
                     def-file))
               ;;Figure out whether to run some actions, by file local vars.
               (autoloads-p
-                 (ignore-errors
-                    (with-current-buffer buf 
-                       (not no-update-autoloads))))
+                 (and
+                    (string-match emacs-lisp-file-regexp filename)
+                    (ignore-errors
+                       (with-current-buffer buf 
+                          (not no-update-autoloads)))
+                    (elinstall-proceed-p 'autoloads
+                       (list
+                          '( "Do autoloads for %s? ")
+                          filename))))
+              
               (do-compile-p
                  (and
                     byte-compile