if (FALSE) { # identical(Sys.getenv("IN_PKGDOWN"), "true")
withr::with_tempdir({
writeLines(state.name[1:25], "state_names_1.md")
writeLines(state.name[26:50], "state_names_2.md")
tools <- btw_tools("files_code_search")
tools$btw_tool_files_code_search(
term = "kentucky",
case_sensitive = FALSE,
show_lines = TRUE
)
})
}
Run the code above in your browser using DataLab