gnu: cutadapt: Use ‘modify-phases’ syntax.

* gnu/packages/bioinformatics.scm (cutadapt)[arguments]: Use
‘modify-phases’.
This commit is contained in:
Tobias Geerinckx-Rice 2016-12-19 21:13:53 +01:00
parent 2fb5af2c2b
commit 33d5b2464d
No known key found for this signature in database
GPG Key ID: 91CCDB9B48541B99
1 changed files with 15 additions and 14 deletions

View File

@ -1816,9 +1816,11 @@ preparation protocols.")
"19smhh6444ikn4jlmyhvffw4m5aw7yg07rqsk7arg8dkwyga1i4v")))) "19smhh6444ikn4jlmyhvffw4m5aw7yg07rqsk7arg8dkwyga1i4v"))))
(build-system python-build-system) (build-system python-build-system)
(arguments (arguments
;; tests must be run after install `(#:phases
`(#:phases (alist-cons-after (modify-phases %standard-phases
'install 'check ;; The tests must be run after installation.
(delete 'check)
(add-after 'install 'check
(lambda* (#:key inputs outputs #:allow-other-keys) (lambda* (#:key inputs outputs #:allow-other-keys)
(setenv "PYTHONPATH" (setenv "PYTHONPATH"
(string-append (string-append
@ -1828,8 +1830,7 @@ preparation protocols.")
(string-take (string-take-right (string-take (string-take-right
(assoc-ref inputs "python") 5) 3) (assoc-ref inputs "python") 5) 3)
"/site-packages")) "/site-packages"))
(zero? (system* "nosetests" "-P" "tests"))) (zero? (system* "nosetests" "-P" "tests")))))))
(alist-delete 'check %standard-phases))))
(inputs (inputs
`(("python-xopen" ,python-xopen))) `(("python-xopen" ,python-xopen)))
(native-inputs (native-inputs