# will produce lints
lint(
text = 'system.file(file.path("path", "to", "data"), package = "foo")',
linters = system_file_linter()
)
lint(
text = 'file.path(system.file(package = "foo"), "path", "to", "data")',
linters = system_file_linter()
)
# okay
lint(
text = 'system.file("path", "to", "data", package = "foo")',
linters = system_file_linter()
)
Run the code above in your browser using DataLab