[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
08/36: gnu: proot: Use invoke.
From: |
Mark H. Weaver |
Subject: |
08/36: gnu: proot: Use invoke. |
Date: |
Thu, 12 Apr 2018 04:09:18 -0400 (EDT) |
mhw pushed a commit to branch core-updates
in repository guix.
commit 06153a30891d3aba0bf415713c5cc1b6db6a7cc8
Author: Mark H Weaver <address@hidden>
Date: Fri Mar 16 02:21:49 2018 -0400
gnu: proot: Use invoke.
* gnu/packages/linux.scm (proot)[arguments]: Use invoke and remove vestigial
plumbing.
---
gnu/packages/linux.scm | 29 ++++++++++++++---------------
1 file changed, 14 insertions(+), 15 deletions(-)
diff --git a/gnu/packages/linux.scm b/gnu/packages/linux.scm
index 07a9b00..5543d23 100644
--- a/gnu/packages/linux.scm
+++ b/gnu/packages/linux.scm
@@ -4241,24 +4241,23 @@ userspace queueing component and the logging
subsystem.")
(setenv "PATH"
(string-append (getenv "PATH") ":/bin"))
- (zero? (system* "make" "check" "-C" "tests"
- ;;"V=1"
- "-j" (number->string n))))))
+ (invoke "make" "check" "-C" "tests"
+ ;;"V=1"
+ "-j" (number->string n)))))
(replace 'install
(lambda* (#:key outputs #:allow-other-keys)
;; The 'install' rule does nearly nothing.
- (let ((out (assoc-ref outputs "out")))
- (and (zero?
- ;; TODO: 'make install-care' (does not even
- ;; build currently.)
- (system* "make" "-C" "src" "install"
- (string-append "PREFIX=" out)))
- (let ((man1 (string-append out
- "/share/man/man1")))
- (mkdir-p man1)
- (copy-file "doc/proot/man.1"
- (string-append man1 "/proot.1"))
- #t))))))))
+ (let* ((out (assoc-ref outputs "out"))
+ (man1 (string-append out "/share/man/man1")))
+ ;; TODO: 'make install-care' (does not even
+ ;; build currently.)
+ (invoke "make" "-C" "src" "install"
+ (string-append "PREFIX=" out))
+
+ (mkdir-p man1)
+ (copy-file "doc/proot/man.1"
+ (string-append man1 "/proot.1"))
+ #t))))))
(native-inputs `(("which" ,which)
;; For 'mcookie', used by some of the tests.
- 35/36: gnu: gdb: Return #t from all phases., (continued)
- 35/36: gnu: gdb: Return #t from all phases., Mark H. Weaver, 2018/04/12
- 30/36: gnu: iniparser: Return #t from all phases., Mark H. Weaver, 2018/04/12
- 31/36: gnu: fontforge: Return #t from all phases., Mark H. Weaver, 2018/04/12
- 18/36: gnu: dtach: Return #t from all phases., Mark H. Weaver, 2018/04/12
- 21/36: gnu: mpv: Return #t from all phases., Mark H. Weaver, 2018/04/12
- 11/36: gnu: brotli: Use invoke., Mark H. Weaver, 2018/04/12
- 33/36: gnu: isc-dhcp: Return #t from all phases., Mark H. Weaver, 2018/04/12
- 36/36: gnu: ratpoison: Return #t from all phases., Mark H. Weaver, 2018/04/12
- 05/36: gnu: gpm: Use invoke., Mark H. Weaver, 2018/04/12
- 10/36: gnu: libtar: Use invoke., Mark H. Weaver, 2018/04/12
- 08/36: gnu: proot: Use invoke.,
Mark H. Weaver <=
- 25/36: gnu: serd: Return #t from all phases., Mark H. Weaver, 2018/04/12
- 26/36: gnu: sord: Return #t from all phases., Mark H. Weaver, 2018/04/12
- 27/36: gnu: lilv: Return #t from all phases., Mark H. Weaver, 2018/04/12
- 17/36: gnu: pzstd: Use invoke., Mark H. Weaver, 2018/04/12
- 13/36: gnu: java-snappy-1: Use invoke., Mark H. Weaver, 2018/04/12
- 32/36: gnu: grilo: Return #t from all phases., Mark H. Weaver, 2018/04/12
- 34/36: gnu: kbd: Return #t from all phases., Mark H. Weaver, 2018/04/12
- 20/36: gnu: python-waf: Return #t from all phases., Mark H. Weaver, 2018/04/12
- 22/36: gnu: sane-backends-minimal: Return #t from all phases., Mark H. Weaver, 2018/04/12
- 01/36: gnu: guile-irregex: Use invoke., Mark H. Weaver, 2018/04/12