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

gnu: opam: Use modify-phases.

Browse source 
* gnu/packages/ocaml.scm (opam)[arguments]: Use modify-phases.
This commit is contained in:
Eric Bavier 2016-08-22 12:27:06 -05:00
parent 1d33b9eaa9
commit 2385cab164
No known key found for this signature in database
GPG key ID: 1EBBD204781F962C
1 changed files with 12 additions and 14 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

14
gnu/packages/ocaml.scm
View file

@ -176,20 +176,18 @@ (define-public opam
;; …/_obuild/opam/opam.asm install P1' failed.
#:tests? #f
#:phases (alist-cons-before
'build 'pre-build
(lambda* (#:key inputs #:allow-other-keys)
#:phases (modify-phases %standard-phases
(add-before 'build 'pre-build
(lambda* (#:key inputs make-flags #:allow-other-keys)
(let ((bash (assoc-ref inputs "bash")))
(substitute* "src/core/opamSystem.ml"
(("\"/bin/sh\"")
(string-append "\"" bash "/bin/sh\"")))))
(alist-cons-before
'check 'pre-check
(string-append "\"" bash "/bin/sh\""))))))
(add-before 'check 'pre-check
(lambda _
(setenv "HOME" (getcwd))
(and (system "git config --global user.email guix@gnu.org")
(system "git config --global user.name Guix")))
%standard-phases))))
(system "git config --global user.name Guix")))))))
(native-inputs
`(("git" ,git) ;for the tests
("python" ,python))) ;for the tests