futurile/guix-play
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

gnu: ribotaper: Simplify with G-expression.

Browse Source 
* gnu/packages/bioinformatics.scm (ribotaper)[arguments]: Use G-expression and
drop trailing #T from build phase.
This commit is contained in:
Ricardo Wurmus 2023-05-12 22:21:14 +02:00
parent 0e20ed322d
commit fac8721bfd
No known key found for this signature in database
GPG Key ID: 197A5888235FACAC
1 changed files with 13 additions and 14 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

27
gnu/packages/bioinformatics.scm
View File

@ -1152,20 +1152,19 @@ cpp.find_library('hdf5_cpp', dirs : '~a'), "
"0ykjbps1y3z3085q94npw8i9x5gldc6shy8vlc08v76zljsm07hv"))))
(build-system gnu-build-system)
(arguments
`(#:phases
(modify-phases %standard-phases
(add-after 'install 'wrap-executables
(lambda* (#:key inputs outputs #:allow-other-keys)
(let* ((out (assoc-ref outputs "out")))
(for-each
(lambda (script)
(wrap-program (string-append out "/bin/" script)
`("R_LIBS_SITE" ":" = (,(getenv "R_LIBS_SITE")))))
'("create_annotations_files.bash"
"create_metaplots.bash"
"Ribotaper_ORF_find.sh"
"Ribotaper.sh")))
#t)))))
(list
#:phases
#~(modify-phases %standard-phases
(add-after 'install 'wrap-executables
(lambda _
(for-each
(lambda (script)
(wrap-program (string-append #$output "/bin/" script)
`("R_LIBS_SITE" ":" = (,(getenv "R_LIBS_SITE")))))
'("create_annotations_files.bash"
"create_metaplots.bash"
"Ribotaper_ORF_find.sh"
"Ribotaper.sh")))))))
(inputs
(list bedtools-2.18
samtools-0.1