Unclear usage of local_tempfile

[MLopez-Ibanez]

Commit 6a33f3b changed the behavior of local_tempfile without adding an example, and the examples of with_tempfile. The new example does not even make sense.

I think the examples here:

withr/R/tempfile.R

Line 11 in bd97d3a

#' @examples

should be:

# Check how big iris would be if written as csv vs RDS
with_tempfile("tf", {write.csv(iris, tf); file.size(tf)})
tf <- local_tempfile()
saveRDS(iris, tf)
file.size(tf)
# Example using lines
tf <- local_tempfile(lines = c("TITLE extra line", "2 3 5 7", "", "11 13 17"))
readLines(tf, n = -1)

[MLopez-Ibanez]

Would a pull request be welcome?

[hadley]

Thanks for the offer, but while looking at this, I realised that the example needed bit more of a overhaul.