fix: pass scan_qmd_packages argument (#114)

Yunuuuu · web-flow · commit 20a627ea2e5c · 2025-07-01T23:59:16.000+08:00
diff --git a/update-dependencies.R b/update-dependencies.R
@@ -11,7 +11,7 @@ scan_qmd_packages <- function(root = ".") {
     patterns <- c(
         "(?:install\\.packages|pkg_install|BiocManager::install|install_github|install_gitlab)\\((?:'|\")([a-zA-z].*)(?:'|\")\\)"
     )
-    paths <- list.files(".",
+    paths <- list.files(root,
         pattern = "\\.qmd$", recursive = TRUE,
         ignore.case = TRUE
     )

Original file line number	Diff line number	Diff line change
`@@ -11,7 +11,7 @@ scan_qmd_packages <- function(root = ".") {`
`11`	`11`	`patterns <- c(`
`12`	`12`	`"(?:install\\.packages\|pkg_install\|BiocManager::install\|install_github\|install_gitlab)\\((?:'\|\")([a-zA-z].*)(?:'\|\")\\)"`
`13`	`13`	`)`
`14`		`- paths <- list.files(".",`
	`14`	`+ paths <- list.files(root,`
`15`	`15`	`pattern = "\\.qmd$", recursive = TRUE,`
`16`	`16`	`ignore.case = TRUE`
`17`	`17`	`)`