ryan77627/guix
1
0
Fork 0
mirror of https://git.in.rschanz.org/ryan77627/guix.git synced 2024-12-25 22:08:16 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

gnu: acl: Use invoke instead of system*.

Browse source 
* gnu/packages/acl.scm (acl)[arguments]: Use invoke.  All phases return #t.
This commit is contained in:
Mark H Weaver 2018-03-16 06:24:54 -04:00
parent a33391bd1e
commit c0d56bb227
No known key found for this signature in database
GPG key ID: 7CEF29847562C516
1 changed files with 4 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

7
gnu/packages/acl.scm
View file

@ -1,6 +1,6 @@
;;; GNU Guix --- Functional package management for GNU ;;; GNU Guix --- Functional package management for GNU
;;; Copyright © 2012 Nikita Karetnikov <nikita@karetnikov.org> ;;; Copyright © 2012 Nikita Karetnikov <nikita@karetnikov.org>
;;; Copyright © 2014 Mark H Weaver <mhw@netris.org> ;;; Copyright © 2014, 2018 Mark H Weaver <mhw@netris.org>
;;; Copyright © 2014 Andreas Enge <andreas@enge.fr> ;;; Copyright © 2014 Andreas Enge <andreas@enge.fr>
;;; Copyright © 2017 Efraim Flashner <efraim@flashner.co.il> ;;; Copyright © 2017 Efraim Flashner <efraim@flashner.co.il>
;;; Copyright © 2018 Ricardo Wurmus <rekado@elephly.net> ;;; Copyright © 2018 Ricardo Wurmus <rekado@elephly.net>
@ -77,10 +77,11 @@ (define-public acl
;; this user does not exist within Guix's build environment. ;; this user does not exist within Guix's build environment.
(for-each (lambda (file) (for-each (lambda (file)
(delete-file (string-append "test/" file))) (delete-file (string-append "test/" file)))
'("setfacl-X.test" "cp.test" "misc.test")))) '("setfacl-X.test" "cp.test" "misc.test"))
#t))
(replace 'install (replace 'install
(lambda _ (lambda _
(zero? (system* "make" "install" "install-lib" "install-dev"))))))) (invoke "make" "install" "install-lib" "install-dev"))))))
(inputs `(("attr" ,attr))) (inputs `(("attr" ,attr)))
(native-inputs (native-inputs
`(("gettext" ,gettext-minimal) `(("gettext" ,gettext-minimal)