#-------------------------------------------------------------------------------
# tcplConfReset: Generate default config file
#-------------------------------------------------------------------------------
#' @rdname config_funcs
#' @export
tcplConfReset <- function () {
conf_file <- .getConfFile()
cat("###################################################################",
"",
"## Detailed information about this file available in the help file for",
"## tcplConf (?tcplConf).",
"",
"DRVR <- \"tcplLite\"",
"HOST <- NA_character_",
"USER <- NA_character_",
"PASS <- NA_character_",
"DB <- file.path(system.file(package = \"tcpl\"),",
" \"csv\")",
"",
"###################################################################",
sep = "\n",
file = file.path(conf_file),
append = FALSE)
}
#-------------------------------------------------------------------------------
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.