civodul pushed a commit to branch core-updates
in repository guix.
commit fadbac0ecc7b7ca314a265de5a1eae07946c0d61
Author: Maxime Devos <[email protected]>
AuthorDate: Mon May 31 19:46:22 2021 +0200
gnu: proteinortho: Set #:guile argument of 'wrap-script'.
* gnu/packages/bioinformatics.scm
(proteinortho)[arguments]<#:phases>{wrap-programs}:
Set #:guile argument of ‘wrap-script’.
Signed-off-by: Ludovic Courtès <[email protected]>
---
gnu/packages/bioinformatics.scm | 6 ++++--
1 file changed, 4 insertions(+), 2 deletions(-)
diff --git a/gnu/packages/bioinformatics.scm b/gnu/packages/bioinformatics.scm
index 85f7859..7d8496e 100644
--- a/gnu/packages/bioinformatics.scm
+++ b/gnu/packages/bioinformatics.scm
@@ -5447,9 +5447,11 @@ predicts the locations of structural units in the
sequences.")
(add-after 'install 'wrap-programs
(lambda* (#:key inputs outputs #:allow-other-keys)
(let ((path (getenv "PATH"))
- (out (assoc-ref outputs "out")))
+ (out (assoc-ref outputs "out"))
+ (guile (search-input-file inputs "bin/guile")))
(for-each (lambda (script)
- (wrap-script script `("PATH" ":" prefix (,path))))
+ (wrap-script script #:guile guile
+ `("PATH" ":" prefix (,path))))
(cons (string-append out "/bin/proteinortho")
(find-files out "\\.(pl|py)$"))))
#t)))))
