v <- tempfile("vault-")
init_vault(v, rproj = FALSE, agent_instructions = FALSE)
ingest("Refers to [[absent]].", type = "articles", source = "demo",
vault = v)
lint(v)
unlink(v, recursive = TRUE)
Run the code above in your browser using DataLab