nixo
/
guix-devel
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

gnu: pplacer: Fetch sources from git. 

* gnu/packages/bioinformatics.scm (pplacer)[source]: Fetch from git.
[arguments]: Make files writable; use INVOKE.
This commit is contained in:
Ricardo Wurmus 2018-11-07 21:15:28 +01:00
parent 6052264b56
commit a2b9d6a8d0
No known key found for this signature in database
GPG Key ID: 197A5888235FACAC
1 changed files with 9 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

16
gnu/packages/bioinformatics.scm
View File

@ -4310,19 +4310,20 @@ interrupted by stop codons. OrfM finds and prints these ORFs.")
(license license:lgpl3+))) (license license:lgpl3+)))
(define-public pplacer (define-public pplacer
(let ((commit "g807f6f3")) (let ((commit "807f6f3"))
(package (package
(name "pplacer") (name "pplacer")
;; The commit should be updated with each version change. ;; The commit should be updated with each version change.
(version "1.1.alpha19") (version "1.1.alpha19")
(source (source
(origin (origin
(method url-fetch) (method git-fetch)
(uri (string-append "https://github.com/matsen/pplacer/archive/v" (uri (git-reference
version ".tar.gz")) (url "https://github.com/matsen/pplacer.git")
(file-name (string-append name "-" version ".tar.gz")) (commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256 (sha256
(base32 "0z1lnd2s8sh6kpzg106wzbh2szw7h0hvq8syd5a6wv4rmyyz6x0f")))) (base32 "11ppbbbx20p2g9wj3ff64dhnarb12q79v7qh4rk0gj6lkbz4n7cn"))))
(build-system ocaml-build-system) (build-system ocaml-build-system)
(arguments (arguments
`(#:ocaml ,ocaml-4.01 `(#:ocaml ,ocaml-4.01
@ -4339,11 +4340,12 @@ interrupted by stop codons. OrfM finds and prints these ORFs.")
(local-dir "cddlib_guix")) (local-dir "cddlib_guix"))
(mkdir local-dir) (mkdir local-dir)
(with-directory-excursion local-dir (with-directory-excursion local-dir
(system* "tar" "xvf" cddlib-src)) (invoke "tar" "xvf" cddlib-src))
(let ((cddlib-src-folder (let ((cddlib-src-folder
(string-append local-dir "/" (string-append local-dir "/"
(list-ref (scandir local-dir) 2) (list-ref (scandir local-dir) 2)
"/lib-src"))) "/lib-src")))
(for-each make-file-writable (find-files "cdd_src" ".*"))
(for-each (for-each
(lambda (file) (lambda (file)
(copy-file file (copy-file file