gnu: cowsay: Use INVOKE.
* gnu/packages/games.scm (cowsay)[arguments]: Use INVOKE in build phases.
This commit is contained in:
parent
4665d8c943
commit
482bdf2522
|
@ -338,14 +338,14 @@ and against the others like yourself, that want what you have.")
|
||||||
(delete 'build) ; nothing to be built
|
(delete 'build) ; nothing to be built
|
||||||
(replace 'install
|
(replace 'install
|
||||||
(lambda* (#:key outputs #:allow-other-keys)
|
(lambda* (#:key outputs #:allow-other-keys)
|
||||||
(zero? (system* "sh" "install.sh"
|
(invoke "sh" "install.sh"
|
||||||
(assoc-ref outputs "out")))))
|
(assoc-ref outputs "out"))))
|
||||||
(delete 'check)
|
(delete 'check)
|
||||||
(add-after 'install 'check
|
(add-after 'install 'check
|
||||||
(lambda* (#:key outputs #:allow-other-keys)
|
(lambda* (#:key outputs #:allow-other-keys)
|
||||||
(zero? (system* (string-append (assoc-ref outputs "out")
|
(invoke (string-append (assoc-ref outputs "out")
|
||||||
"/bin/cowsay")
|
"/bin/cowsay")
|
||||||
"We're done!")))))))
|
"We're done!"))))))
|
||||||
(inputs
|
(inputs
|
||||||
`(("perl" ,perl)))
|
`(("perl" ,perl)))
|
||||||
(home-page (string-append "https://web.archive.org/web/20071026043648/"
|
(home-page (string-append "https://web.archive.org/web/20071026043648/"
|
||||||
|
|
Loading…
Reference in New Issue