mirror of
https://git.in.rschanz.org/ryan77627/guix.git
synced 2024-12-24 21:38:07 -05:00
gnu: recutils: Symlink bash loadables.
This makes it so that the "enable" builtin finds readrec and testrec without having to supply the full store path. * gnu/packages/databases.scm (recutils)[#:phases]: Add ‘symlink-bash-loadables’.
This commit is contained in:
parent
5abcfe7a79
commit
c210dbe43e
1 changed files with 16 additions and 1 deletions
|
@ -1559,7 +1559,22 @@ (define-public recutils
|
||||||
#~(list "--disable-static"
|
#~(list "--disable-static"
|
||||||
(string-append "--with-bash-headers="
|
(string-append "--with-bash-headers="
|
||||||
(search-input-directory %build-inputs
|
(search-input-directory %build-inputs
|
||||||
"include/bash")))))
|
"include/bash")))
|
||||||
|
#:phases
|
||||||
|
#~(modify-phases %standard-phases
|
||||||
|
(add-after 'install 'symlink-bash-loadables
|
||||||
|
(lambda* (#:key outputs #:allow-other-keys)
|
||||||
|
(with-directory-excursion (string-append
|
||||||
|
(assoc-ref outputs "out")
|
||||||
|
"/lib")
|
||||||
|
(mkdir "bash")
|
||||||
|
(for-each
|
||||||
|
(compose symlink
|
||||||
|
(lambda (loadable)
|
||||||
|
(values
|
||||||
|
(string-append (getcwd) "/" loadable ".so")
|
||||||
|
(string-append "bash/" loadable))))
|
||||||
|
'("readrec" "testrec"))))))))
|
||||||
(native-inputs
|
(native-inputs
|
||||||
(list bc check-0.14 pkg-config))
|
(list bc check-0.14 pkg-config))
|
||||||
(inputs
|
(inputs
|
||||||
|
|
Loading…
Reference in a new issue