params object name recognized as dependency (#17)

* pass object name to target deps

* add NEWS

NEWS.md

@@ -3,6 +3,7 @@
 * Included 'jinjar' as a dependency, allowing jinja-like SQL queries
 * Breaking change: `query_params` argument in `tar_sql()` is now `params`.
 * Additional tests
+* `params` object name now recognized as a dependency.
 
 # sqltargets 0.1.0
 

R/tar_sql.R

@@ -68,13 +68,16 @@ tar_sql <- function(name,
   check_pkg_installed("DBI")
   check_pkg_installed("glue")
 
+  params_nm <- deparse(substitute(params))
+
   name <- targets::tar_deparse_language(substitute(name))
   params <- targets::tar_tidy_eval(
     expr = substitute(params),
     envir = targets::tar_option_get("envir"),
     tidy_eval = tidy_eval
   )
 
+
   tar_sql_raw(
     name = name,
     path = path,
@@ -87,6 +90,7 @@ tar_sql <- function(name,
     priority = priority,
     resources = resources,
     retrieval = retrieval,
-    cue = cue
+    cue = cue,
+    params_nm = params_nm
   )
 }

R/tar_sql_raw.R

@@ -28,6 +28,7 @@
 #'   that are passed to `jinjar::render()`. The list is quoted
 #'   (not evaluated until the target runs)
 #'   so that upstream targets can serve as parameter values.
+#' @param params_nm Character of length 1, name of object passed to `params`.
 #' @examples
 #' targets::tar_dir({  # tar_dir() runs code from a temporary directory.
 #'   # Unparameterized SQL query:
@@ -62,7 +63,7 @@ tar_sql_raw <- function(
     resources = targets::tar_option_get("resources"),
     retrieval = targets::tar_option_get("retrieval"),
     cue = targets::tar_option_get("cue"),
-    deps = deps
+    params_nm = NULL
 ) {
   targets::tar_assert_scalar(name)
   targets::tar_assert_chr(name)
@@ -111,7 +112,7 @@ tar_sql_raw <- function(
     resources = resources,
     retrieval = retrieval,
     cue = cue,
-    deps = c(deps, file_dep)
+    deps = c(deps, params_nm, file_dep)
   )
 
   tar_sql_target_list(