[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[nongnu] elpa-admin cabb85a 398/439: * elpa-admin.el: Avoid build side-p
From: |
Philip Kaludercic |
Subject: |
[nongnu] elpa-admin cabb85a 398/439: * elpa-admin.el: Avoid build side-products in the tarball |
Date: |
Sun, 17 Oct 2021 15:48:44 -0400 (EDT) |
branch: elpa-admin
commit cabb85a720ccd7b85d8e59f65f29fae96cd6987a
Author: Stefan Monnier <monnier@iro.umontreal.ca>
Commit: Stefan Monnier <monnier@iro.umontreal.ca>
* elpa-admin.el: Avoid build side-products in the tarball
(elpaa--make-one-tarball): Fix last change.
(elpaa--build-Info-1): Remove intermediate .texi file when building
from a .org file.
(elpaa-batch-main-files): New function.
---
elpa-admin.el | 23 +++++++++++++++++++++--
1 file changed, 21 insertions(+), 2 deletions(-)
diff --git a/elpa-admin.el b/elpa-admin.el
index 2de8e95..e9b59d4 100644
--- a/elpa-admin.el
+++ b/elpa-admin.el
@@ -350,7 +350,8 @@ Return non-nil if a new tarball was created."
(cons (match-string 1 file) file))
(directory-files destdir nil re)))))
(when ldir
- (cl-pushnew (list (file-name-as-directory ldir) "") renames))
+ (cl-pushnew (list (file-name-as-directory ldir) "") renames
+ :test #'equal))
(when revision-function
(elpaa--select-revision dir pkg-spec (funcall revision-function)))
(elpaa--copyright-check pkg-spec)
@@ -1429,7 +1430,8 @@ More at " (elpaa--default-url pkgname))
(elpaa--build-Info-1 f dir))))
(defun elpaa--build-Info-1 (docfile dir)
- (let* ((default-directory (elpaa--dirname dir)))
+ (let* ((default-directory (elpaa--dirname dir))
+ (tmpfiles '()))
(when (and docfile (file-readable-p docfile)
(string-match "\\.org\\'" docfile))
(with-temp-buffer
@@ -1441,6 +1443,7 @@ More at " (elpaa--default-url pkgname))
(when (re-search-backward "ELPATEXI=\\(.*\\)\n?" nil t)
(setq docfile (concat (file-name-directory docfile)
(match-string 1)))
+ (push docfile tmpfiles)
(elpaa--temp-file docfile))))
(when (and docfile (file-readable-p docfile)
@@ -1474,6 +1477,8 @@ More at " (elpaa--default-url pkgname))
(copy-file docfile info-file)
(setq docfile info-file)))
+ (mapc #'delete-file tmpfiles) ;Avoid intermediate files in the tarball.
+
(when (and docfile (file-readable-p docfile))
(let ((dir-file (expand-file-name "dir")))
(elpaa--temp-file dir-file)
@@ -1696,5 +1701,19 @@ More at " (elpaa--default-url pkgname))
(concat lisp-dir "/" pkgname "-autoloads.el"))
nil alf nil 'silent))))
+;;; Main files
+
+(defun elpaa-batch-main-files ()
+ (let ((dstfile (pop command-line-args-left)))
+ (with-temp-buffer
+ (dolist (pkg-spec (elpaa--get-specs))
+ (let* ((pkgname (car pkg-spec))
+ (defmf (concat pkgname ".el"))
+ (mf (elpaa--main-file pkg-spec)))
+ (unless (equal mf defmf)
+ (insert (format "%s:%s\n" pkgname mf)))))
+ (write-region (point-min) (point-max)
+ dstfile nil 'silent))))
+
(provide 'elpa-admin)
;;; elpa-admin.el ends here
- [nongnu] elpa-admin 7be6e5f 330/439: ; Update copyright year, (continued)
- [nongnu] elpa-admin 7be6e5f 330/439: ; Update copyright year, Philip Kaludercic, 2021/10/17
- [nongnu] elpa-admin a186f57 335/439: * README: Convert to org-mode and prepare for export., Philip Kaludercic, 2021/10/17
- [nongnu] elpa-admin cff34fa 336/439: Support generating readme.html from README, Philip Kaludercic, 2021/10/17
- [nongnu] elpa-admin cdef4ce 338/439: * admin/archive-contents.el: Add preliminary support for the NonGNU archive, Philip Kaludercic, 2021/10/17
- [nongnu] elpa-admin 0f8fca3 360/439: * elpa-admin.el: Add support for sending out release announcements, Philip Kaludercic, 2021/10/17
- [nongnu] elpa-admin 6d923b9 410/439: * elpa-admin.el (elpaa--prune-old-tarballs): Fix renaming destination, Philip Kaludercic, 2021/10/17
- [nongnu] elpa-admin da248f5 403/439: * elpa-admin.el: Fix spurious message and unneeded error, Philip Kaludercic, 2021/10/17
- [nongnu] elpa-admin 1d5287f 362/439: * elpa-admin.el: Add support for building Info files and "dir" files, Philip Kaludercic, 2021/10/17
- [nongnu] elpa-admin b3fe7c4 368/439: * elpa-admin.el (elpaa--email-reply-to): New var, Philip Kaludercic, 2021/10/17
- [nongnu] elpa-admin 21fc443 349/439: * externals-list ("markdown-mode"): New package, Philip Kaludercic, 2021/10/17
- [nongnu] elpa-admin cabb85a 398/439: * elpa-admin.el: Avoid build side-products in the tarball,
Philip Kaludercic <=
- [nongnu] elpa-admin 08c448d 400/439: * elpa-admin.el (elpaa--pull): Fix last change, Philip Kaludercic, 2021/10/17
- [nongnu] elpa-admin 21e1b0e 101/439: Sync with yasnippet/master, Philip Kaludercic, 2021/10/17
- [nongnu] elpa-admin 7b7692d 243/439: Merge commit '6dc971269f6f9435e5159c2cfe66fc5e4b296df2', Philip Kaludercic, 2021/10/17
- [nongnu] elpa-admin 858666e 250/439: * admin/archive-contents.el: Use cl-lib, Philip Kaludercic, 2021/10/17
- [nongnu] elpa-admin f4e99d9 369/439: * elpa-admin.el (elpaa--make-one-package): Fix thinko, Philip Kaludercic, 2021/10/17
- [nongnu] elpa-admin 8ac87bb 355/439: Fold ert-support.el into elpa-admin.el, Philip Kaludercic, 2021/10/17
- [nongnu] elpa-admin 7fa8f34 399/439: * elpa-admin.el (elpaa--pull): Don't set non-existing upstream, Philip Kaludercic, 2021/10/17
- [nongnu] elpa-admin 78966fe 348/439: * README.org: Improve introductory paragraphs., Philip Kaludercic, 2021/10/17
- [nongnu] elpa-admin 1ddc741 347/439: * README.org: Prefer org syntax and prepare for export., Philip Kaludercic, 2021/10/17
- [nongnu] elpa-admin 0466964 352/439: * README.org (Adding a package): Adjust to use the new `make` targets, Philip Kaludercic, 2021/10/17