mirror of
https://codeberg.org/guix/guix.git
synced 2026-01-25 03:55:08 -06:00
gnu: jaro: Set paths.
* gnu/packages/guile-xyz.scm (jaro)[arguments]: Add ‘set-paths’ phase. Change-Id: I0a1fe4124d4458a1585816398f5362759784acea Signed-off-by: Ludovic Courtès <ludo@gnu.org> Merges: #1988
This commit is contained in:
parent
920043cf0e
commit
b843a3f5d8
1 changed files with 18 additions and 0 deletions
|
|
@ -7673,6 +7673,24 @@ ftypes.")
|
|||
(lambda* (#:key outputs #:allow-other-keys)
|
||||
(install-file "jaro"
|
||||
(string-append #$output "/bin"))))
|
||||
(add-before 'install 'set-paths
|
||||
(lambda* (#:key inputs #:allow-other-keys)
|
||||
(substitute* "jaro"
|
||||
(("^exec guile")
|
||||
(string-append "exec "
|
||||
(search-input-file inputs "/bin/guile")))
|
||||
(("\"mimetype\"")
|
||||
(string-append "\""
|
||||
(search-input-file inputs "/bin/mimetype")
|
||||
"\""))
|
||||
(("\"file\"")
|
||||
(string-append "\""
|
||||
(search-input-file inputs "/bin/file")
|
||||
"\""))
|
||||
(("\"printf\"")
|
||||
(string-append "\""
|
||||
(search-input-file inputs "/bin/printf")
|
||||
"\"")))))
|
||||
(replace 'check
|
||||
(lambda* (#:key tests? #:allow-other-keys)
|
||||
(when tests?
|
||||
|
|
|
|||
Loading…
Add table
Reference in a new issue