[nongnu] elpa-admin da3bd64 263/439: [admin int] Use ‘archive--read-externals-list’ more.

[Philip Kaludercic]

branch: elpa-admin
commit da3bd64809dafb920908e7a35207be9960b00d17
Author: Thien-Thi Nguyen <t...@gnu.org>
Commit: Thien-Thi Nguyen <t...@gnu.org>

    [admin int] Use ‘archive--read-externals-list’ more.
    
    * admin/archive-contents.el (archive-gitignore-externals):
    Use ‘archive--read-externals-list’ here.
---
 admin/archive-contents.el | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/admin/archive-contents.el b/admin/archive-contents.el
index 4cdc5f1..67f4414 100755
--- a/admin/archive-contents.el
+++ b/admin/archive-contents.el
@@ -804,7 +804,8 @@ If WITH-CORE is non-nil, it means we manage :core packages 
as well."
 
 (defun archive-gitignore-externals (elf gf)
   (let ((pkgs (cl-loop
-               for (name kind . _) in (read (find-file-noselect elf))
+               for (name kind . _) in (archive--read-externals-list
+                                       (file-name-directory elf))
                when (memq kind '(:external :core))
                collect name)))
     (with-current-buffer (find-file-noselect gf)