(custom-make-dependencies): Ignore preloaded files.

1 files changed, 10 insertions, 1 deletions

diff --git a/lisp/cus-dep.el b/lisp/cus-dep.el
index 5574cca82b9..03185661a2e 100644
--- a/lisp/cus-dep.el
+++ b/lisp/cus-dep.el
@@ -40,9 +40,18 @@ Usage: emacs -batch -l ./cus-dep.el -f custom-make-dependencies DIRS"
       (message "Directory %s" subdir)
       (let ((files (directory-files subdir nil "\\`[^=].*\\.el\\'"))
             (default-directory (expand-file-name subdir))
+            (preloaded (concat "\\`"
+                               (regexp-opt (mapcar
+                                            (lambda (f)
+                                              (file-name-sans-extension
+                                               (file-name-nondirectory f)))
+                                            preloaded-file-list) t)
+                               "\\.el\\'"))
             is-autoloaded)
         (dolist (file files)
-          (when (file-exists-p file)
+          (when (and (file-exists-p file)
+                     ;; Ignore files that are preloaded.
+                     (not (string-match preloaded file)))
             (erase-buffer)
             (insert-file-contents file)
             (goto-char (point-min))