[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[nongnu] elpa-admin 5eab162 377/439: * elpa-admin.el: Give read access t
From: |
Philip Kaludercic |
Subject: |
[nongnu] elpa-admin 5eab162 377/439: * elpa-admin.el: Give read access to Git in `:make` |
Date: |
Sun, 17 Oct 2021 15:48:40 -0400 (EDT) |
branch: elpa-admin
commit 5eab1623f7bf2be4ab371a6ae5f5740df06e4420
Author: Stefan Monnier <monnier@iro.umontreal.ca>
Commit: Stefan Monnier <monnier@iro.umontreal.ca>
* elpa-admin.el: Give read access to Git in `:make`
(elpaa--sandboxed-extra-ro-dirs): New var.
(elpaa--call-sandboxed): Use it.
(elpaa--make): Set it.
---
elpa-admin.el | 8 +++++++-
1 file changed, 7 insertions(+), 1 deletion(-)
diff --git a/elpa-admin.el b/elpa-admin.el
index f01fff9..bc3bace 100644
--- a/elpa-admin.el
+++ b/elpa-admin.el
@@ -548,6 +548,8 @@ The INFILE and DISPLAY arguments are fixed as nil."
"--proc" "/proc"
"--tmpfs" "/tmp"))
+(defvar elpaa--sandboxed-extra-ro-dirs nil)
+
(defun elpaa--call-sandboxed (destination &rest args)
"Like ‘elpaa--call’ but sandboxed.
More specifically, uses Bubblewrap such that the command is
@@ -559,6 +561,8 @@ Signal an error if the command did not finish with exit
code 0."
(let ((exitcode
(apply #'elpaa--call destination "bwrap"
(append elpaa--bwrap-args
+ (cl-mapcan (lambda (d) `("--ro-bind" ,d ,d))
+ elpaa--sandboxed-extra-ro-dirs)
`("--bind" ,default-directory ,default-directory)
args))))
(unless (eq exitcode 0)
@@ -1440,7 +1444,9 @@ More at " (elpaa--default-url pkgname))
(let ((target (elpaa--spec-get pkg-spec :make)))
(when target
(with-temp-buffer
- (let ((default-directory (elpaa--dirname dir)))
+ (let ((elpaa--sandboxed-extra-ro-dirs
+ (cons elpaa--sandboxed-extra-ro-dirs default-directory))
+ (default-directory (elpaa--dirname dir)))
(apply #'elpaa--call-sandboxed t "make"
(if (consp target) target (list target)))
(elpaa--message "%s" (buffer-string)))))))
- [nongnu] elpa-admin 1ddc741 347/439: * README.org: Prefer org syntax and prepare for export., (continued)
- [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
- [nongnu] elpa-admin a74eed7 366/439: * elpa-admin.el (elpaa--bwrap-args): Add `lib64` for amd64 hosts, Philip Kaludercic, 2021/10/17
- [nongnu] elpa-admin 60ecd84 351/439: * admin/archive-contents.el: Fix construction of index.html, Philip Kaludercic, 2021/10/17
- [nongnu] elpa-admin dcc3222 396/439: Fix various problems when compiling packages in place, Philip Kaludercic, 2021/10/17
- [nongnu] elpa-admin d1d1dbd 393/439: * elpa-admin.el (elpaa--build-Info): Fix last change, Philip Kaludercic, 2021/10/17
- [nongnu] elpa-admin 0942ea5 385/439: ; * README.org: Fix typos., Philip Kaludercic, 2021/10/17
- [nongnu] elpa-admin 21cddee 407/439: * elpa-admin.el (elpaa--get-devel-version): Fix regexp substitution, Philip Kaludercic, 2021/10/17
- [nongnu] elpa-admin ee591c2 379/439: * elpa-admin.el (elpaa--release-email): Cc maintainer, Philip Kaludercic, 2021/10/17
- [nongnu] elpa-admin d19a5b8 341/439: * README.org: New file, Philip Kaludercic, 2021/10/17
- [nongnu] elpa-admin 5eab162 377/439: * elpa-admin.el: Give read access to Git in `:make`,
Philip Kaludercic <=
- [nongnu] elpa-admin 040972d 342/439: * README.org: Describe how to build the archive and add a package, Philip Kaludercic, 2021/10/17
- [nongnu] elpa-admin 6dcc26f 378/439: * elpa-admin.el (elpaa--make): Fix last change, Philip Kaludercic, 2021/10/17
- [nongnu] elpa-admin 26d341c 391/439: * elpa-admin.el (elpaa--make): Add support for non-make command, Philip Kaludercic, 2021/10/17
- [nongnu] elpa-admin fd06277 384/439: * elpa-admin.el (elpaa--core-package-sync): Don't presume shape of plist, Philip Kaludercic, 2021/10/17
- [nongnu] elpa-admin f3fd8c5 387/439: * GNUmakefile (%.tar): New target, Philip Kaludercic, 2021/10/17
- [nongnu] elpa-admin 221c427 350/439: * admin/archive-contents.el: Improve handling of snapshot version numbers, Philip Kaludercic, 2021/10/17
- [nongnu] elpa-admin c84575d 411/439: * elpa-admin.el (elpaa--get-release-revision): Fix code for :core pkgs, Philip Kaludercic, 2021/10/17
- [nongnu] elpa-admin e3ca730 420/439: Support LibreJS, Philip Kaludercic, 2021/10/17
- [nongnu] elpa-admin 9e01d93 406/439: * elpa-admin.el (elpaa--prune-old-tarballs): Return resulting oldtarballs, Philip Kaludercic, 2021/10/17
- [nongnu] elpa-admin fae2e2e 412/439: * elpa-admin.el (elpaa--prune-old-tarballs): Fix computation of .sig name, Philip Kaludercic, 2021/10/17