diff options
author | Maxime Devos <maximedevos@telenet.be> | 2021-05-31 19:54:49 +0200 |
---|---|---|
committer | Ludovic Courtès <ludo@gnu.org> | 2021-06-04 22:34:33 +0200 |
commit | b2459387b9af3acff543854d8f45df7376140a91 (patch) | |
tree | 347ec5d59b8712daae6c59562a9340f2e67ce4fe /gnu | |
parent | 2d092a2afae60421157b486c4056f12ba6d0d20a (diff) | |
download | guix-b2459387b9af3acff543854d8f45df7376140a91.tar guix-b2459387b9af3acff543854d8f45df7376140a91.tar.gz |
gnu: nanopolish: Set #:guile argument of 'wrap-script'.
* gnu/packages/bioinformatics.scm
(nanopolish)[arguments]<#:phases>{wrap-programs}:
Set #:guile argument of ‘wrap-script’.
Signed-off-by: Ludovic Courtès <ludo@gnu.org>
Diffstat (limited to 'gnu')
-rw-r--r-- | gnu/packages/bioinformatics.scm | 8 |
1 files changed, 5 insertions, 3 deletions
diff --git a/gnu/packages/bioinformatics.scm b/gnu/packages/bioinformatics.scm index 965e26b812..fc2fc867ac 100644 --- a/gnu/packages/bioinformatics.scm +++ b/gnu/packages/bioinformatics.scm @@ -13583,16 +13583,18 @@ choosing which reads pass the filter.") (find-files "scripts" ".*")) #t))) (add-after 'install 'wrap-programs - (lambda* (#:key outputs #:allow-other-keys) + (lambda* (#:key inputs outputs #:allow-other-keys) (let ((pythonpath (getenv "GUIX_PYTHONPATH")) (perl5lib (getenv "PERL5LIB")) (scripts (string-append (assoc-ref outputs "out") - "/share/nanopolish/scripts"))) + "/share/nanopolish/scripts")) + (guile (search-input-file inputs "bin/guile"))) (for-each (lambda (file) (wrap-program file `("GUIX_PYTHONPATH" ":" prefix (,pythonpath)))) (find-files scripts "\\.py")) (for-each (lambda (file) - (wrap-script file `("PERL5LIB" ":" prefix (,perl5lib)))) + (wrap-script file #:guile guile + `("PERL5LIB" ":" prefix (,perl5lib)))) (find-files scripts "\\.pl")))))))) (inputs `(("guile" ,guile-3.0) ; for wrappers |