diff options
Diffstat (limited to 'guix')
| -rw-r--r-- | guix/build-system/r.scm | 2 | ||||
| -rw-r--r-- | guix/import/cran.scm | 8 |
2 files changed, 5 insertions, 5 deletions
diff --git a/guix/build-system/r.scm b/guix/build-system/r.scm index c649036210..2c8a89f8de 100644 --- a/guix/build-system/r.scm +++ b/guix/build-system/r.scm @@ -50,7 +50,7 @@ available via the first URI, the second URI points to the archived version." (define (bioconductor-uri name version) "Return a URI string for the R package archive on Bioconductor for the release corresponding to NAME and VERSION." - (string-append "http://bioconductor.org/packages/release/bioc/src/contrib/" + (string-append "https://bioconductor.org/packages/release/bioc/src/contrib/" name "_" version ".tar.gz")) (define %r-build-system-modules diff --git a/guix/import/cran.scm b/guix/import/cran.scm index 056a7dcc7c..9b08ebfb63 100644 --- a/guix/import/cran.scm +++ b/guix/import/cran.scm @@ -126,7 +126,7 @@ package definition." `((,type (,'quasiquote ,(format-inputs package-inputs))))))) (define %cran-url "http://cran.r-project.org/web/packages/") -(define %bioconductor-url "http://bioconductor.org/packages/") +(define %bioconductor-url "https://bioconductor.org/packages/") ;; The latest Bioconductor release is 3.5. Bioconductor packages should be ;; updated together. @@ -446,7 +446,7 @@ dependencies." (define (bioconductor-package? package) "Return true if PACKAGE is an R package from Bioconductor." (let ((predicate (lambda (uri) - (and (string-prefix? "http://bioconductor.org" uri) + (and (string-prefix? "https://bioconductor.org" uri) ;; Data packages are neither listed in SVN nor on ;; the Github mirror, so we have to exclude them ;; from the set of bioconductor packages that can be @@ -465,7 +465,7 @@ dependencies." (define (bioconductor-data-package? package) "Return true if PACKAGE is an R data package from Bioconductor." (let ((predicate (lambda (uri) - (and (string-prefix? "http://bioconductor.org" uri) + (and (string-prefix? "https://bioconductor.org" uri) (string-contains uri "/data/annotation/"))))) (and (string-prefix? "r-" (package-name package)) (match (and=> (package-source package) origin-uri) @@ -478,7 +478,7 @@ dependencies." (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) + (and (string-prefix? "https://bioconductor.org" uri) (string-contains uri "/data/experiment/"))))) (and (string-prefix? "r-" (package-name package)) (match (and=> (package-source package) origin-uri) |