gnu: prank: Remove trailing #T.

* gnu/packages/bioinformatics.scm (prank)[arguments]: Remove trailing #T from
build phases.
This commit is contained in:
Ricardo Wurmus 2021-12-04 15:11:04 +01:00
parent 114eb987cb
commit e128839a94
No known key found for this signature in database
GPG key ID: 197A5888235FACAC

View file

@ -5779,15 +5779,13 @@ (define-public prank
`(#:phases `(#:phases
(modify-phases %standard-phases (modify-phases %standard-phases
(add-after 'unpack 'enter-src-dir (add-after 'unpack 'enter-src-dir
(lambda _ (lambda _ (chdir "src")))
(chdir "src")
#t))
(add-after 'unpack 'remove-m64-flag (add-after 'unpack 'remove-m64-flag
;; Prank will build with the correct 'bit-ness' without this flag ;; Prank will build with the correct 'bit-ness' without this flag
;; and this allows building on 32-bit machines. ;; and this allows building on 32-bit machines.
(lambda _ (substitute* "src/Makefile" (lambda _
(("-m64") "")) (substitute* "src/Makefile"
#t)) (("-m64") ""))))
(delete 'configure) (delete 'configure)
(replace 'install (replace 'install
(lambda* (#:key outputs #:allow-other-keys) (lambda* (#:key outputs #:allow-other-keys)
@ -5801,8 +5799,7 @@ (define-public prank
(install-file "prank" bin) (install-file "prank" bin)
(wrap-program (string-append bin "/prank") (wrap-program (string-append bin "/prank")
`("PATH" ":" prefix (,path))) `("PATH" ":" prefix (,path)))
(install-file "prank.1" man)) (install-file "prank.1" man)))))))
#t)))))
(inputs (inputs
`(("mafft" ,mafft) `(("mafft" ,mafft)
("exonerate" ,exonerate) ("exonerate" ,exonerate)