# will produce lints
code <- "
box::use(
stringr[str_pad],
)
"
lintr::lint(text = code, linters = box_unused_att_pkg_fun_linter())
code <- "
box::use(
stringr[alias_func = str_pad],
)
"
lintr::lint(text = code, linters = box_unused_att_pkg_fun_linter())
# okay
code <- "
box::use(
stringr[str_pad],
)
str_pad()
"
lintr::lint(text = code, linters = box_unused_att_pkg_fun_linter())
code <- "
box::use(
stringr[alias_func = str_pad],
)
alias_func()
"
lintr::lint(text = code, linters = box_unused_att_pkg_fun_linter())
Run the code above in your browser using DataLab