about summary refs log tree commit diff
path: root/pkgs/development/r-modules/generate-r-packages.R
diff options
context:
space:
mode:
authorJustin Bedő <cu@cua0.org>2021-09-16 09:36:18 +0000
committerGitHub <noreply@github.com>2021-09-16 09:36:18 +0000
commit29595eba1860303a6f99f9917c8eb078716b2975 (patch)
treea21374dde0c1d6c62501f8ba33d2762620e84616 /pkgs/development/r-modules/generate-r-packages.R
parentb21caea1f088ca380bba38cd34827bc0931f96d0 (diff)
parent96eb04ef7ad151d671050bfa87d76398cc56c297 (diff)
Merge pull request #127790 from PhDyellow/r_bioc_updater_revised
r-modules: R bioc updater revised
Diffstat (limited to 'pkgs/development/r-modules/generate-r-packages.R')
-rwxr-xr-xpkgs/development/r-modules/generate-r-packages.R9
1 files changed, 8 insertions, 1 deletions
diff --git a/pkgs/development/r-modules/generate-r-packages.R b/pkgs/development/r-modules/generate-r-packages.R
index 1ac15ef79e79a..f656fdca0922d 100755
--- a/pkgs/development/r-modules/generate-r-packages.R
+++ b/pkgs/development/r-modules/generate-r-packages.R
@@ -1,9 +1,16 @@
 #!/usr/bin/env Rscript
 library(data.table)
 library(parallel)
+library(BiocManager)
 cl <- makeCluster(10)
 
-biocVersion <- 3.12
+biocVersion <- BiocManager:::.version_map()
+biocVersion <- biocVersion[biocVersion$R == getRversion()[, 1:2],c("Bioc", "BiocStatus")]
+if ("release" %in% biocVersion$BiocStatus) {
+  biocVersion <-  as.numeric(as.character(biocVersion[biocVersion$BiocStatus == "release", "Bioc"]))
+} else {
+  biocVersion <-  max(as.numeric(as.character(biocVersion$Bioc)))
+}
 snapshotDate <- Sys.Date()-1
 
 mirrorUrls <- list( bioc=paste0("http://bioconductor.statistik.tu-dortmund.de/packages/", biocVersion, "/bioc/src/contrib/")