delete renv

.Rprofile

@@ -1,47 +1,45 @@
-# Set renv profile base on R version.
-.get_dependencies <- function(project_dir) {
-  admdev_loc <- find.package("admiraldev", lib.loc = .libPaths(), quiet = TRUE)
-  adm_dev_suggests <- if (length(admdev_loc) != 0) {
-    renv:::renv_dependencies_discover_description(admdev_loc, fields = c("Depends", "Imports", "LinkingTo", "Suggests"))
-  } else {
-    data.frame(Packages = character(0))
-  }
-  suggests_packages <- renv:::renv_dependencies_discover_description(project_dir, fields = "Suggests")
+if (Sys.getenv("GITHUB_ACTIONS") == "") {
+  # Set renv profile base on R version.
+  .get_dependencies <- function(project_dir) {
+    admdev_loc <- find.package("admiraldev", lib.loc = .libPaths(), quiet = TRUE)
+    adm_dev_suggests <- if (length(admdev_loc) != 0) {
+      renv:::renv_dependencies_discover_description(admdev_loc, fields = c("Depends", "Imports", "LinkingTo", "Suggests"))
+    } else {
+      data.frame(Packages = character(0))
+    }
+    suggests_packages <- renv:::renv_dependencies_discover_description(project_dir, fields = "Suggests")
 
-  packages <- names(
-    renv:::renv_package_dependencies(
-      unique(c(
-        project_dir,
-        adm_dev_suggests[["Package"]],
-        suggests_packages[["Package"]],
-        c("staged.dependencies", "renv", "styler")
-      ))
+    packages <- names(
+      renv:::renv_package_dependencies(
+        unique(c(
+          project_dir,
+          adm_dev_suggests[["Package"]],
+          suggests_packages[["Package"]],
+          c("staged.dependencies", "renv", "styler")
+        ))
+      )
     )
-  )
-  packages[!(packages %in% c("admiral", "admiraldev", "admiralci", "pharmaversesdtm", getwd()))]
-}
+    packages[!(packages %in% c("admiral", "admiraldev", "admiralci", "pharmaversesdtm", getwd()))]
+  }
 
-options(renv.snapshot.filter = .get_dependencies)
+  options(renv.snapshot.filter = .get_dependencies)
 
-.renv_profile <- paste(R.version$major, substr(R.version$minor, 1, 1), sep = ".")
-if (!file.exists("./renv/profile")) {
-  if (.renv_profile %in% c("4.1", "4.2", "4.3")) {
-    message("Set renv profile to `", .renv_profile, "`")
-    Sys.setenv("RENV_PROFILE" = .renv_profile)
+  .renv_profile <- paste(R.version$major, substr(R.version$minor, 1, 1), sep = ".")
+  if (!file.exists("./renv/profile")) {
+    if (.renv_profile %in% c("4.1", "4.2", "4.3")) {
+      message("Set renv profile to `", .renv_profile, "`")
+      Sys.setenv("RENV_PROFILE" = .renv_profile)
+    } else {
+      message("This repository do not contains the renv profile for your R version.")
+    }
   } else {
-    message("This repository do not contains the renv profile for your R version.")
+    message(
+      "Using renv profile from `renv/profile` file.\n",
+      "The `", readLines("./renv/profile"), "` profile will be used."
+    )
   }
-} else {
-  message(
-    "Using renv profile from `renv/profile` file.\n",
-    "The `", readLines("./renv/profile"), "` profile will be used."
-  )
-}
 
-if (Sys.getenv("GITHUB_ACTIONS") != "") {
-  options(repos = c(CRAN = "https://packagemanager.posit.co/cran/latest"))
-  Sys.setenv("RENV_AUTOLOADER_ENABLED" = FALSE)
+  Sys.setenv("RENV_CONFIG_SANDBOX_ENABLED" = FALSE)
+  Sys.setenv("RENV_CONFIG_AUTO_SNAPSHOT" = FALSE)
+  source("renv/activate.R")
 }
-Sys.setenv("RENV_CONFIG_SANDBOX_ENABLED" = FALSE)
-Sys.setenv("RENV_CONFIG_AUTO_SNAPSHOT" = FALSE)
-source("renv/activate.R")

.github/workflows/common.yml

@@ -78,7 +78,7 @@ jobs:
       r-version: "${{ needs.get_r_version.outputs.r-version }}"
   check:
     name: Check
-    uses: pharmaverse/admiralci/.github/workflows/r-cmd-check.yml@main
+    uses: pharmaverse/admiralci/.github/workflows/r-cmd-check.yml@use_cran_latest
     with:
       error-on: warning # TODO: find a way to ignore specific notes
     if: github.event_name == 'push'