gnu: cloc: Update phase style.
* gnu/packages/code.scm (cloc)[arguments]: Substitute INVOKE for SYSTEM* and end phases with #t.
This commit is contained in:
parent
95943ed7dc
commit
53244d1ffa
|
@ -229,13 +229,13 @@ COCOMO model or user-provided parameters.")
|
||||||
(replace 'install
|
(replace 'install
|
||||||
(lambda* (#:key inputs outputs #:allow-other-keys)
|
(lambda* (#:key inputs outputs #:allow-other-keys)
|
||||||
(let* ((out (assoc-ref outputs "out")))
|
(let* ((out (assoc-ref outputs "out")))
|
||||||
(zero?
|
(invoke "make" "-C" "Unix"
|
||||||
(system* "make" "-C" "Unix"
|
(string-append "prefix=" out)
|
||||||
(string-append "prefix=" out)
|
(string-append "INSTALL="
|
||||||
(string-append "INSTALL="
|
(assoc-ref inputs "coreutils")
|
||||||
(assoc-ref inputs "coreutils")
|
"/bin/install")
|
||||||
"/bin/install")
|
"install")
|
||||||
"install")))))
|
#t)))
|
||||||
(add-after 'install 'wrap-program
|
(add-after 'install 'wrap-program
|
||||||
(lambda* (#:key inputs outputs #:allow-other-keys)
|
(lambda* (#:key inputs outputs #:allow-other-keys)
|
||||||
(let ((out (assoc-ref outputs "out")))
|
(let ((out (assoc-ref outputs "out")))
|
||||||
|
|
Loading…
Reference in New Issue