me/guix
Archived
1
0
Fork 0
Code Activity

gnu: filtlong: Use gexp.

Browse source 
* gnu/packages/bioinformatics.scm (filtlong)[arguments]: Use gexp.
This commit is contained in:
Ricardo Wurmus 2023-01-06 14:05:58 +01:00
parent 0070e52ade
commit 067c8a7445
No known key found for this signature in database
GPG key ID: 197A5888235FACAC
1 changed files with 22 additions and 23 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

19
gnu/packages/bioinformatics.scm
View file

@ -14321,23 +14321,22 @@ phase + query phase).")
(base32 "1xr92r820x8qlkcr3b57iw223yq8vjgyi42jr79w2xgw47qzr575")))) (base32 "1xr92r820x8qlkcr3b57iw223yq8vjgyi42jr79w2xgw47qzr575"))))
(build-system gnu-build-system) (build-system gnu-build-system)
(arguments (arguments
`(#:tests? #f ; no check target (list
#:tests? #f ; no check target
#:phases #:phases
(modify-phases %standard-phases #~(modify-phases %standard-phases
(delete 'configure) (delete 'configure)
(replace 'install (replace 'install
(lambda* (#:key outputs #:allow-other-keys) (lambda _
(let* ((out (assoc-ref outputs "out")) (let ((bin (string-append #$output "/bin"))
(bin (string-append out "/bin")) (scripts (string-append #$output "/share/filtlong/scripts")))
(scripts (string-append out "/share/filtlong/scripts")))
(install-file "bin/filtlong" bin) (install-file "bin/filtlong" bin)
(install-file "scripts/histogram.py" scripts) (install-file "scripts/histogram.py" scripts)
(install-file "scripts/read_info_histograms.sh" scripts)))) (install-file "scripts/read_info_histograms.sh" scripts))))
(add-after 'install 'wrap-program (add-after 'install 'wrap-program
(lambda* (#:key inputs outputs #:allow-other-keys) (lambda _
(let* ((out (assoc-ref outputs "out")) (let ((path (getenv "GUIX_PYTHONPATH")))
(path (getenv "GUIX_PYTHONPATH"))) (wrap-program (string-append #$output
(wrap-program (string-append out
"/share/filtlong/scripts/histogram.py") "/share/filtlong/scripts/histogram.py")
`("GUIX_PYTHONPATH" ":" prefix (,path)))))) `("GUIX_PYTHONPATH" ":" prefix (,path))))))
(add-before 'check 'patch-tests (add-before 'check 'patch-tests