Browse Source

import cran: Add predicate for Bioconductor experiment packages.

* guix/import/cran.scm (bioconductor-experiment-package?): New variable.
wip-gexp-hygiene
Ricardo Wurmus 5 years ago
parent
commit
daaa270ecc
No known key found for this signature in database GPG Key ID: 197A5888235FACAC
  1. 13
      guix/import/cran.scm

13
guix/import/cran.scm

@ -457,6 +457,19 @@ dependencies."
(any predicate uris))
(_ #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
(upstream-updater
(name 'cran)

Loading…
Cancel
Save