From de534d6fe60f6feb31d7809dae9cdbd63e598e22 Mon Sep 17 00:00:00 2001
From: Julia Silge <julia.silge@gmail.com>
Date: Fri, 21 Oct 2022 12:57:02 -0600
Subject: [PATCH] Add default in vetiver dashboard format. Related to
 rstudio/rmarkdown#2407.

---
 R/dashboard.R            | 2 +-
 man/vetiver_dashboard.Rd | 2 +-
 2 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/R/dashboard.R b/R/dashboard.R
index 5177b0dd..9d161494 100644
--- a/R/dashboard.R
+++ b/R/dashboard.R
@@ -26,7 +26,7 @@
 #' real model.
 #'
 #' @export
-vetiver_dashboard <- function(pins, display_pins = TRUE, ...) {
+vetiver_dashboard <- function(pins = list(), display_pins = TRUE, ...) {
 
     rlang::check_installed("flexdashboard")
     dashboard_dots <- rlang::list2(...)
diff --git a/man/vetiver_dashboard.Rd b/man/vetiver_dashboard.Rd
index 7f66a962..5dbc6663 100644
--- a/man/vetiver_dashboard.Rd
+++ b/man/vetiver_dashboard.Rd
@@ -6,7 +6,7 @@
 \alias{pin_example_kc_housing_model}
 \title{R Markdown format for model monitoring dashboards}
 \usage{
-vetiver_dashboard(pins, display_pins = TRUE, ...)
+vetiver_dashboard(pins = list(), display_pins = TRUE, ...)
 
 get_vetiver_dashboard_pins()