namespace and internal fun name cleanup

NAMESPACE

@@ -7,3 +7,4 @@ export(tar_sql_deps)
 export(tar_sql_exec)
 export(tar_sql_file)
 export(tar_sql_raw)
+importFrom(RSQLite,SQLite)

R/sqltargets.R

@@ -5,6 +5,7 @@
 #' See the README on
 #' \href{https://github.com/daranzolin/sqltargets#readme}{GitHub}
 #'
+#' @importFrom RSQLite SQLite
 #' @docType package
 #' @name sqltargets
 NULL

R/tar_sql_raw.R

@@ -121,7 +121,7 @@ tar_sql_file_command <- function(path) {
  list(path = path),
  env = list(path = path)
  )
- fun <- rlang::call_ns("sqltargets", "tar_sql_file")
+ fun <- int_call_ns("sqltargets", "tar_sql_file")
  expr <- list(
  fun,
  args
@@ -146,7 +146,7 @@ tar_sql_command <- function(
  )
  deps <- c(sort(unique(sql_deps(path))), file_dep)
  deps <- call_list(as_symbols(deps))
- fun <- call_ns("sqltargets", "tar_sql_exec")
+ fun <- int_call_ns("sqltargets", "tar_sql_exec")
  expr <- list(
  fun,
  args = args,

R/utils.R

@@ -16,7 +16,7 @@ call_list <- function(args) {
 as_symbols <- function(x) {
  lapply(x, as.symbol)
 }
-call_ns <- function(pkg, fun) {
+int_call_ns <- function(pkg, fun) {
  call_function("::", as_symbols(c(pkg, fun)))
 }