fix: use system file instead of here

vusaverse · Mar 15, 2024 · 385a1fd · 385a1fd
1 parent 3d417be
commit 385a1fd
Show file tree

Hide file tree

Showing 2 changed files with 3 additions and 3 deletions.
diff --git a/DESCRIPTION b/DESCRIPTION
@@ -13,5 +13,4 @@ Suggests:
     testthat (>= 3.0.0)
 Config/testthat/edition: 3
 Imports: 
-    config,
-    here
+    config
diff --git a/R/create_config_csv_files.R b/R/create_config_csv_files.R
@@ -37,7 +37,8 @@ create_config_csv_files <- function(user_config_path = "user_config.yml", output
   } else {
     message("No user-specified config.yml found. Using package defaults.")
     # Fall back to the package's default config.yml
-    user_config <- config::get(file = here::here("inst", "config.yml"))
+    package_config_path <- system.file("config.yml", package = "vvprojector", mustWork = TRUE)
+    user_config <- config::get(file = package_config_path)
 
     # Inform the user about the package defaults
     message("Package defaults are:")