gnu: fossil: Update phase style.
* gnu/packages/version-control.scm (fossil)[arguments]: Substitute INVOKE for SYSTEM* and end phases with #t.master
parent
f136c8f23d
commit
5c0f68e844
|
@ -1643,14 +1643,15 @@ repository\" with git-annex.")
|
||||||
#:phases (modify-phases %standard-phases
|
#:phases (modify-phases %standard-phases
|
||||||
(replace 'configure
|
(replace 'configure
|
||||||
(lambda* (#:key outputs (configure-flags '())
|
(lambda* (#:key outputs (configure-flags '())
|
||||||
#:allow-other-keys)
|
#:allow-other-keys)
|
||||||
;; The 'configure' script is not an autoconf script and
|
;; The 'configure' script is not an autoconf script and
|
||||||
;; chokes on unrecognized options.
|
;; chokes on unrecognized options.
|
||||||
(zero? (apply system*
|
(apply invoke
|
||||||
"./configure"
|
"./configure"
|
||||||
(string-append "--prefix="
|
(string-append "--prefix="
|
||||||
(assoc-ref outputs "out"))
|
(assoc-ref outputs "out"))
|
||||||
configure-flags))))
|
configure-flags)
|
||||||
|
#t))
|
||||||
(add-before 'check 'test-setup
|
(add-before 'check 'test-setup
|
||||||
(lambda _
|
(lambda _
|
||||||
(setenv "USER" "guix")
|
(setenv "USER" "guix")
|
||||||
|
|
Reference in New Issue