R/includes.R

get_includes <- function() {
  includes_dir <- system.file("includes", package = "zeppelin")

  map(dir_ls(includes_dir, recursive = TRUE, type = "file"), ~ {
    structure(
      list(
        content = paste(readLines(.), collapse = "\n"),
        name = path_file(.)
      ),
      class = "include"
    )
  })
}
nteetor/zeppelin documentation built on May 23, 2019, 8:52 a.m.