Do not import, use explicit ::

So it is easier to embed into pak.

NAMESPACE

@@ -31,8 +31,5 @@ export(without_cache)
 export(without_compiler)
 export(without_latex)
 importFrom(R6,R6Class)
-importFrom(callr,rcmd_process)
-importFrom(callr,rcmd_process_options)
-importFrom(cli,symbol)
 importFrom(utils,head)
 importFrom(utils,tail)

R/build-bg.R

@@ -98,8 +98,6 @@ pkgbuild_process <- R6Class(
   )
 )
 
-#' @importFrom callr rcmd_process rcmd_process_options
-
 rcb_init <- function(self, private, super, path, dest_path, binary,
                      vignettes, manual, clean_doc, args, needs_compilation,
                      compile_attributes, register_routines, quiet) {
@@ -119,7 +117,7 @@ rcb_init <- function(self, private, super, path, dest_path, binary,
   withr_set_makevars(compiler_flags(debug = FALSE), new_path = private$makevars_file)
   withr_with_envvar(
     c("R_MAKEVARS_USER" = private$makevars_file), {
-      options <- rcmd_process_options(
+      options <- callr::rcmd_process_options(
         cmd = options$cmd,
         cmdargs = c(options$path, options$args),
         wd = options$out_dir,

R/callback.R

@@ -1,4 +1,3 @@
-#' @importFrom cli symbol
 #' @importFrom utils head tail
 
 # This is adapted from https://github.com/r-lib/rcmdcheck/blob/7ee14764c2b17ee2c2f4131a9e19d1b56a66ed0f/R/callback.R
@@ -60,7 +59,7 @@ block_callback <- function(quiet) {
     should_time <<- TRUE
     if (grepl(" \\.\\.\\. OK\\s*$", x)) {
       state <<- "OK"
-      style(ok = symbol$tick, "  ", pale = no(x, "OK"))
+      style(ok = cli::symbol$tick, "  ", pale = no(x, "OK"))
     } else if (grepl(" \\.\\.\\. NOTE\\s*$", x)) {
       state <<- "NOTE"
       style(note = c("N  ", no(x, "NOTE")))
@@ -72,12 +71,12 @@ block_callback <- function(quiet) {
       style(err = c("E  ", no(x, "ERROR")))
     } else if (grepl("^\\* checking tests \\.\\.\\.[ ]?$", x)) {
       state <<- "tests"
-      style(pale = c(symbol$line, "  ", no(x)))
+      style(pale = c(cli::symbol$line, "  ", no(x)))
     } else if (grepl("^\\* DONE\\s*$", x)) {
       state <<- "OK"
       NA_character_
     } else {
-      style(pale = c(symbol$line, "  ", no(x)))
+      style(pale = c(cli::symbol$line, "  ", no(x)))
     }
   }