ryan77627/guix
1
0
Fork 0
mirror of https://git.in.rschanz.org/ryan77627/guix.git synced 2024-11-08 07:56:16 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

gnu: seqtk: Update to 1.3.

Browse source 
* gnu/packages/bioinformatics.scm (seqtk): Update to 1.3.
[source]: Remove outdated snippet.
[arguments]: Use INVOKE and return #T unconditionally.
This commit is contained in:
Ricardo Wurmus 2018-11-07 22:34:41 +01:00
parent 019fcdf20a
commit 63f3255e13
No known key found for this signature in database
GPG key ID: 197A5888235FACAC
1 changed files with 5 additions and 12 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

17
gnu/packages/bioinformatics.scm
View file

@ -5868,7 +5868,7 @@ (define-public seqmagick
(define-public seqtk (define-public seqtk
(package (package
(name "seqtk") (name "seqtk")
(version "1.2") (version "1.3")
(source (origin (source (origin
(method git-fetch) (method git-fetch)
(uri (git-reference (uri (git-reference
@ -5877,15 +5877,7 @@ (define-public seqtk
(file-name (git-file-name name version)) (file-name (git-file-name name version))
(sha256 (sha256
(base32 (base32
"1mdkgmzdy734a0na9hxbl4k41jjkm87bvjbm7bdbh50fsra86f93")) "1bfzlqa84b5s1qi22blmmw2s8xdyp9h9ydcq22pfjhh5gab3yz6l"))))
(modules '((guix build utils)))
(snippet
'(begin
;; Remove extraneous header files, as is done in the seqtk
;; master branch.
(for-each (lambda (file) (delete-file file))
(list "ksort.h" "kstring.h" "kvec.h"))
#t))))
(build-system gnu-build-system) (build-system gnu-build-system)
(arguments (arguments
`(#:phases `(#:phases
@ -5893,11 +5885,12 @@ (define-public seqtk
(delete 'configure) (delete 'configure)
(replace 'check (replace 'check
;; There are no tests, so we just run a sanity check. ;; There are no tests, so we just run a sanity check.
(lambda _ (zero? (system* "./seqtk" "seq")))) (lambda _ (invoke "./seqtk" "seq") #t))
(replace 'install (replace 'install
(lambda* (#:key outputs #:allow-other-keys) (lambda* (#:key outputs #:allow-other-keys)
(let ((bin (string-append (assoc-ref outputs "out") "/bin/"))) (let ((bin (string-append (assoc-ref outputs "out") "/bin/")))
(install-file "seqtk" bin))))))) (install-file "seqtk" bin)
#t))))))
(inputs (inputs
`(("zlib" ,zlib))) `(("zlib" ,zlib)))
(home-page "https://github.com/lh3/seqtk") (home-page "https://github.com/lh3/seqtk")