[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[nongnu] elpa-admin becd7be 063/439: * archive-contents.el (archive--mak
From: |
Philip Kaludercic |
Subject: |
[nongnu] elpa-admin becd7be 063/439: * archive-contents.el (archive--make-changelog): New fun. |
Date: |
Sun, 17 Oct 2021 15:47:34 -0400 (EDT) |
branch: elpa-admin
commit becd7be9ff5cc5b979195577e7b387cc53bfdbdf
Author: Stefan Monnier <monnier@iro.umontreal.ca>
Commit: Stefan Monnier <monnier@iro.umontreal.ca>
* archive-contents.el (archive--make-changelog): New fun.
(archive--process-multi-file-package): Use it to create the ChangeLog files.
---
admin/archive-contents.el | 10 +++++++++-
1 file changed, 9 insertions(+), 1 deletion(-)
diff --git a/admin/archive-contents.el b/admin/archive-contents.el
index f3b250a..d4cf49b 100644
--- a/admin/archive-contents.el
+++ b/admin/archive-contents.el
@@ -148,6 +148,12 @@ package commentary to PKG-readme.txt. Return the
descriptor."
(delete-directory dir t)
(cons (intern pkg) (vector (version-to-list vers) req desc 'single)))
+(defun archive--make-changelog (dir)
+ "Export Bzr log info of DIR into a ChangeLog file."
+ (let ((default-directory (file-name-as-directory (expand-file-name dir))))
+ (call-process "bzr" nil '(:file "ChangeLog") nil
+ "log" "--gnu-changelog" ".")))
+
(defun archive--process-multi-file-package (dir pkg)
"Deploy the contents of DIR into the archive as a multi-file package.
Rename DIR/ to PKG-VERS/, and write the package commentary to
@@ -156,6 +162,7 @@ PKG-readme.txt. Return the descriptor."
(vers (nth 2 exp))
(req (mapcar 'archive--convert-require (nth 4 exp)))
(readme (expand-file-name "README" dir)))
+ (archive--make-changelog dir)
(unless (equal (nth 1 exp) pkg)
(error (format "Package name %s doesn't match file name %s"
(nth 1 exp) pkg)))
@@ -184,7 +191,8 @@ PKG-readme.txt. Return the descriptor."
(if (not (file-directory-p dir))
(error "Skipping non-package file %s" dir)
(let* ((pkg (file-name-nondirectory dir))
- (autoloads-file (expand-file-name (concat pkg "-autoloads.el")
dir))
+ (autoloads-file (expand-file-name
+ (concat pkg "-autoloads.el") dir))
simple-p version)
;; Omit autoloads and .elc files from the package.
(if (file-exists-p autoloads-file)
- [nongnu] elpa-admin 5f38238 131/439: Merge branch 'master' of https://github.com/leoliu/easy-kill, (continued)
- [nongnu] elpa-admin 5f38238 131/439: Merge branch 'master' of https://github.com/leoliu/easy-kill, Philip Kaludercic, 2021/10/17
- [nongnu] elpa-admin f645cb0 148/439: Merge branch 'master' of git+ssh://git.sv.gnu.org/srv/git/emacs/elpa, Philip Kaludercic, 2021/10/17
- [nongnu] elpa-admin 102fabb 013/439: Start the Grand Unified Debugger Rewrite., Philip Kaludercic, 2021/10/17
- [nongnu] elpa-admin 03e28d1 028/439: README: Document usage of this repository in detail., Philip Kaludercic, 2021/10/17
- [nongnu] elpa-admin 3b5fe95 029/439: * admin/archive-contents.el: New file., Philip Kaludercic, 2021/10/17
- [nongnu] elpa-admin b25e1bf 039/439: Rephrase documentation and comments, Philip Kaludercic, 2021/10/17
- [nongnu] elpa-admin 5fefd44 048/439: Update archive-contents to add package versions from contents., Philip Kaludercic, 2021/10/17
- [nongnu] elpa-admin e148a06 052/439: Put quotes `...' around the example function add-word-to-dictionary, Philip Kaludercic, 2021/10/17
- [nongnu] elpa-admin 45792fe 051/439: Remove version numbers from filenames in packages/ dir., Philip Kaludercic, 2021/10/17
- [nongnu] elpa-admin 5319f2f 062/439: * archive-contents.el: Make `site' more incrementally., Philip Kaludercic, 2021/10/17
- [nongnu] elpa-admin becd7be 063/439: * archive-contents.el (archive--make-changelog): New fun.,
Philip Kaludercic <=
- [nongnu] elpa-admin 6c94727 068/439: archive-contents.el (archive--simple-package-p): Fix prop-line matching., Philip Kaludercic, 2021/10/17
- [nongnu] elpa-admin dc8ca2b 072/439: Note availability of Melpa packages, Philip Kaludercic, 2021/10/17
- [nongnu] elpa-admin 518362a 073/439: Merge pull request #13 from dgutov/master, Philip Kaludercic, 2021/10/17
- [nongnu] elpa-admin 50b05c8 074/439: Add SML-mode., Philip Kaludercic, 2021/10/17
- [nongnu] elpa-admin 4eaf276 078/439: * admin/archive-contents.el (batch-make-archive): Don't demote errors., Philip Kaludercic, 2021/10/17
- [nongnu] elpa-admin b7f2140 081/439: Thanks go to Lars Andersen., Philip Kaludercic, 2021/10/17
- [nongnu] elpa-admin 87dd559 092/439: Update infrastructure for Git., Philip Kaludercic, 2021/10/17
- [nongnu] elpa-admin 2ebff0e 093/439: Use README.{rst,md,org}; Auto-generate foo-pkg.el., Philip Kaludercic, 2021/10/17
- [nongnu] elpa-admin 55c3f5d 100/439: Add YAsnippet metadata., Philip Kaludercic, 2021/10/17
- [nongnu] elpa-admin 73304d8 097/439: Fix up deployment script, Philip Kaludercic, 2021/10/17