diff --git a/.gitignore b/.gitignore index d52c614..bbeb30a 100755 --- a/.gitignore +++ b/.gitignore @@ -7,3 +7,4 @@ dev.R test_install inst/doc docs +dev_untrack.R diff --git a/R/init_template.R b/R/init_template.R index ec7b0a5..8b331f1 100644 --- a/R/init_template.R +++ b/R/init_template.R @@ -8,7 +8,7 @@ #' #' @examples #' init_template("shiny",getwd()) -init_template <- function(template_name, path, confirm = TRUE) { +init_template <- function(template_name, path = getwd(), confirm = TRUE) { # Display a message before the prompt cat("You current working directory will be:\n") diff --git a/_pkgdown.yml b/_pkgdown.yml index b498abe..2e13a2e 100644 --- a/_pkgdown.yml +++ b/_pkgdown.yml @@ -1,4 +1,4 @@ -url: https://www.samuelbharti.com/peacock/ +url: http://www.samuelbharti.com/peacock/ template: bootstrap: 5 diff --git a/man/init_template.Rd b/man/init_template.Rd index cb45877..5172978 100644 --- a/man/init_template.Rd +++ b/man/init_template.Rd @@ -4,7 +4,7 @@ \alias{init_template} \title{Initialize a template repository from GitHub Templates} \usage{ -init_template(template_name, path, confirm = TRUE) +init_template(template_name, path = getwd(), confirm = TRUE) } \arguments{ \item{template_name}{Name of template. "shiny", "cgds"}