From e7c258ded2e3d2ee747872a88b519efc50061ea9 Mon Sep 17 00:00:00 2001 From: Alexandru Mahmoud Date: Mon, 10 Mar 2025 13:48:30 -0400 Subject: [PATCH 1/2] Get name from env variable instead of hardcoded --- R/repositories.R | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/R/repositories.R b/R/repositories.R index 78eb99c..f91cbca 100644 --- a/R/repositories.R +++ b/R/repositories.R @@ -243,7 +243,7 @@ repositories <- function( { container_version <- Sys.getenv("BIOCONDUCTOR_DOCKER_VERSION") if (nzchar(container_version)) { - platform <- "bioconductor_docker" + platform <- Sys.getenv("BIOCONDUCTOR_NAME") } else { platform <- Sys.getenv("TERRA_R_PLATFORM") container_version <- Sys.getenv("TERRA_R_PLATFORM_BINARY_VERSION") From 412f3af1f3a734fe0bdb2906efb3fd15ed976b43 Mon Sep 17 00:00:00 2001 From: Alexandru Mahmoud Date: Mon, 10 Mar 2025 20:15:00 -0400 Subject: [PATCH 2/2] Add default --- R/repositories.R | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/R/repositories.R b/R/repositories.R index f91cbca..c4a8327 100644 --- a/R/repositories.R +++ b/R/repositories.R @@ -243,7 +243,7 @@ repositories <- function( { container_version <- Sys.getenv("BIOCONDUCTOR_DOCKER_VERSION") if (nzchar(container_version)) { - platform <- Sys.getenv("BIOCONDUCTOR_NAME") + platform <- Sys.getenv("BIOCONDUCTOR_NAME", "bioconductor_docker") } else { platform <- Sys.getenv("TERRA_R_PLATFORM") container_version <- Sys.getenv("TERRA_R_PLATFORM_BINARY_VERSION")