emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] elpa-admin 3478d4c34d: * elpa-admin.el (elpaa--make-one-tarball-1


From: Stefan Monnier
Subject: [elpa] elpa-admin 3478d4c34d: * elpa-admin.el (elpaa--make-one-tarball-1): Obey .elpaignore
Date: Wed, 4 May 2022 11:01:48 -0400 (EDT)

branch: elpa-admin
commit 3478d4c34df701a32080f0e0fdb3017c81435d8e
Author: Stefan Monnier <monnier@iro.umontreal.ca>
Commit: Stefan Monnier <monnier@iro.umontreal.ca>

    * elpa-admin.el (elpaa--make-one-tarball-1): Obey .elpaignore
    
    Always use `.elpaignore` rather than only when an `:ignored-files` is
     not provided.
---
 elpa-admin.el | 8 +++-----
 1 file changed, 3 insertions(+), 5 deletions(-)

diff --git a/elpa-admin.el b/elpa-admin.el
index 750dbe9a98..5e991d68bc 100644
--- a/elpa-admin.el
+++ b/elpa-admin.el
@@ -627,11 +627,9 @@ auxillary files unless TARBALL-ONLY is non-nil ."
      (apply #'elpaa--call
             nil "tar"
             `("--exclude-vcs"
-              ,@(cond
-                 (ignores
-                  (mapcar (lambda (i) (format "--exclude=packages/%s/%s" 
pkgname i))
-                          ignores))
-                 ((file-readable-p elpaignore) `("-X" ,elpaignore)))
+              ,@(mapcar (lambda (i) (format "--exclude=packages/%s/%s" pkgname 
i))
+                        ignores)
+              ,@(when (file-readable-p elpaignore) `("-X" ,elpaignore))
               ,@(mapcar (lambda (r) (elpaa--make-tar-transform pkgname r))
                         renames)
               "--transform"



reply via email to

[Prev in Thread] Current Thread [Next in Thread]