# temp_idf {{{
temp_idf <- function(ver, ...) {
idf <- empty_idf(ver)
l <- tryCatch(list(...), error = function(e) 1L)
if (length(l)) with_option(list(validate_level = "draft"), idf$add(...))
idf$save(tempfile(fileext = ".idf"))
idf
}
# }}}
# vim: set fdm=marker:
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.