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

import cran: Add predicate for Bioconductor experiment packages. 

* guix/import/cran.scm (bioconductor-experiment-package?): New variable.
This commit is contained in:
Ricardo Wurmus 2017-04-05 18:42:06 +02:00
parent c9ffa91fd3
commit daaa270ecc
No known key found for this signature in database
GPG Key ID: 197A5888235FACAC
1 changed files with 13 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

13
guix/import/cran.scm
View File

@ -457,6 +457,19 @@ dependencies."
(any predicate uris)) (any predicate uris))
(_ #f))))) (_ #f)))))
(define (bioconductor-experiment-package? package)
"Return true if PACKAGE is an R experiment package from Bioconductor."
(let ((predicate (lambda (uri)
(and (string-prefix? "http://bioconductor.org" uri)
(string-contains uri "/data/experiment/")))))
(and (string-prefix? "r-" (package-name package))
(match (and=> (package-source package) origin-uri)
((? string? uri)
(predicate uri))
((? list? uris)
(any predicate uris))
(_ #f)))))
(define %cran-updater (define %cran-updater
(upstream-updater (upstream-updater
(name 'cran) (name 'cran)