From c210dbe43e554c1f0e7dc645c1e2bd3c29505ffc Mon Sep 17 00:00:00 2001 From: Liliana Marie Prikler Date: Sun, 18 Jun 2023 09:20:22 +0200 Subject: gnu: recutils: Symlink bash loadables. MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit 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’. --- gnu/packages/databases.scm | 17 ++++++++++++++++- 1 file changed, 16 insertions(+), 1 deletion(-) (limited to 'gnu/packages/databases.scm') diff --git a/gnu/packages/databases.scm b/gnu/packages/databases.scm index 42b394daf2..94c3c31fc4 100644 --- a/gnu/packages/databases.scm +++ b/gnu/packages/databases.scm @@ -1559,7 +1559,22 @@ organized in a hash table or B+ tree.") #~(list "--disable-static" (string-append "--with-bash-headers=" (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 (list bc check-0.14 pkg-config)) (inputs -- cgit v1.2.3