#' @details
#' \code{removeAllFiles} remove all entries from \code{dest}. \code{src} will
#' not be affected.
#'
#' @rdname rsync
#' @export
removeAllFiles <- function(db, ...) {
UseMethod("removeAllFiles", db)
}
#' @rdname rsync
#' @export
removeAllFiles.default <- function(db, verbose = FALSE, ...) {
dat <- listFiles(db, recursive = TRUE)
entries <- dat$name
removeFile(db, entries, verbose = verbose, ...)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.