From 7e954a44ebe865beb51fa8ad5712193bc3cb3efb Mon Sep 17 00:00:00 2001
From: Aron Atkins <aron@gweep.net>
Date: Fri, 11 Aug 2023 14:14:19 -0400
Subject: [PATCH] updated bioc version

---
 tests/testthat/test-bundlePackagePackrat.R | 8 +++++---
 tests/testthat/test-bundlePackageRenv.R    | 4 ++--
 2 files changed, 7 insertions(+), 5 deletions(-)

diff --git a/tests/testthat/test-bundlePackagePackrat.R b/tests/testthat/test-bundlePackagePackrat.R
index 00271048..aab7e4a5 100644
--- a/tests/testthat/test-bundlePackagePackrat.R
+++ b/tests/testthat/test-bundlePackagePackrat.R
@@ -37,6 +37,8 @@ test_that("recommended packages are snapshotted", {
 })
 
 test_that("works with BioC packages", {
+  skip_on_cran()
+  skip_on_ci()
   app <- local_temp_app(list("index.Rmd" = c(
     "```{r}",
     "library(Biobase)",
@@ -44,18 +46,18 @@ test_that("works with BioC packages", {
   )))
   withr::local_options(repos = c(
     CRAN = "https://cran.rstudio.com",
-    BioC = "https://bioconductor.org/packages/3.16/bioc"
+    BioC = "https://bioconductor.org/packages/3.17/bioc"
   ))
 
   deps <- snapshotPackratDependencies(app)
 
   Biobase <- deps[deps$Package == "Biobase", ]
   expect_equal(Biobase$Source, "Bioconductor")
-  expect_equal(Biobase$Repository, "https://bioconductor.org/packages/3.16/bioc")
+  expect_equal(Biobase$Repository, "https://bioconductor.org/packages/3.17/bioc")
 
   BiocGenerics <- deps[deps$Package == "BiocGenerics", ]
   expect_equal(BiocGenerics$Source, "Bioconductor")
-  expect_equal(BiocGenerics$Repository, "https://bioconductor.org/packages/3.16/bioc")
+  expect_equal(BiocGenerics$Repository, "https://bioconductor.org/packages/3.17/bioc")
 })
 
 # addPackratSnapshot() ----------------------------------------------------
diff --git a/tests/testthat/test-bundlePackageRenv.R b/tests/testthat/test-bundlePackageRenv.R
index 988e9fc7..22fa3a8d 100644
--- a/tests/testthat/test-bundlePackageRenv.R
+++ b/tests/testthat/test-bundlePackageRenv.R
@@ -33,7 +33,7 @@ test_that("works with BioC packages", {
   )))
   withr::local_options(repos = c(
     CRAN = "https://cran.rstudio.com",
-    BioC = "https://bioconductor.org/packages/3.16/bioc"
+    BioC = "https://bioconductor.org/packages/3.17/bioc"
   ))
   expect_no_condition(
     deps <- snapshotRenvDependencies(app),
@@ -41,7 +41,7 @@ test_that("works with BioC packages", {
   )
   Biobase <- deps[deps$Package == "Biobase", ]
   expect_equal(Biobase$Source, "Bioconductor")
-  expect_equal(Biobase$Repository, "https://bioconductor.org/packages/3.16/bioc")
+  expect_equal(Biobase$Repository, "https://bioconductor.org/packages/3.17/bioc")
 
   withr::local_options(repos = c(
     CRAN = "https://cran.rstudio.com"