R/rm_tail_blank_line.R

#'@export
#'
#'
rm_tail_blank_line <- function(fl){

  lines <- readLines(fl)

  fileConn <- file(as.character(fl))

  writeLines(paste(lines, collapse = "\n"),sep="",fileConn)

  close(fileConn)

}
helloicyvodka/ggVITA documentation built on May 28, 2019, 8:55 p.m.