Better function name

r-lib · Nov 4, 2024 · 7f4c1fa · 7f4c1fa
1 parent 68a5cc6
commit 7f4c1fa
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 2 deletions.
diff --git a/R/scan-deps-queries.R b/R/scan-deps-queries.R
@@ -24,7 +24,7 @@ q_library_0 <- function() {
   ), names = rep("q_library_0", 2))
 }
 
-q_import <- function() {
+q_module_import <- function() {
   c(
     '((call function: (identifier) @fn-name) @dep-code
       (#any-of? @fn-name "import"))',

diff --git a/R/scan-deps.R b/R/scan-deps.R
@@ -278,7 +278,7 @@ parse_pkg_from_call_modules_import <- function(ns, fn, matched) {
 parse_pkg_from_call_modules_module <- function(ns, fn, matched) {
   if (!is.na(ns) && ns != "modules") return(NULL)
   expr <- as.character(matched[["expr"]])
-  hits <- code_query(expr, q_import())[["matched_captures"]]
+  hits <- code_query(expr, q_module_import())[["matched_captures"]]
   code <- hits$code[hits$name == "dep-code"]
   pkgs <- lapply(seq_along(code), function(i) {
     safe_parse_pkg_from_call(ns, "import", code[i])