common prep for options

[ci skip]

Author: lorenzwalthert

.pre-commit-config.yaml

@@ -83,7 +83,7 @@ repos:
           (?x)^(
           inst/hooks/exported/pkgdown.R|
           tests/testthat/in/.*|
-          inst/renv-update\.R|
+          inst/update-renv-prepare.R|
           inst/update-ppm-url.R|
           inst/update-dependency-graph-existing-packages\.R|
           inst/update-existing-hook-dependencies\.R|

inst/update-dependency-graph-existing-packages.R

@@ -14,14 +14,8 @@ hook_deps <- function(root) {
   out <- names(renv:::renv_package_dependencies(out))
   return(sort(out))
 }
-options(
-  # repos = c(
-  #   RSPM = "https://packagemanager.rstudio.com/all/latest",
-  #   CRAN = "https://cran.rstudio.com"
-  # ),
-  install.packages.compile.from.source = "never"
-)
 
+source("inst/update-renv-prepare.R")
 options(renv.snapshot.filter = hook_deps)
 
 renv::snapshot(type = "custom", prompt = FALSE)

inst/update-existing-hook-dependencies.R

@@ -1,8 +1,4 @@
-options(
-  repos = c(RSPM = renv::lockfile_read()$R$Repositories$RSPM), # CRAN is not an option, always use PPM
-  install.packages.check.source = "no", # don't check if source packages are available
-  install.packages.compile.from.source = "never" # probably redundant with the above 'no': If source package is available, only use source if no code needs to be compiled (needs compilation flag on CRAN).
-)
+source("inst/update-renv-prepare.R")
 renv::install("jsonlite")
 renv_deps <- names(jsonlite::read_json("renv.lock")$Packages)
 source("renv/activate.R")

inst/update-renv-prepare.R

@@ -0,0 +1,5 @@
+options(
+  repos = c(RSPM = renv::lockfile_read()$R$Repositories$RSPM), # CRAN is not an option, always use PPM
+  install.packages.check.source = "no", # don't check if source packages are available
+  install.packages.compile.from.source = "never" # probably redundant with the above 'no': If source package is available, only use source if no code needs to be compiled (needs compilation flag on CRAN).
+)