deploy_shiny() has moved to a different package

R/shiny_cast.R

@@ -34,34 +34,3 @@ shiny_cast <- function() {
   )
 }
 
-#' Deploy the Shiny app with rsconnect to shinyapps.io
-#'
-#' @description
-#' This is really just a simple wrapper
-#'
-#' @param path app folder path
-#' @param name.app name of deployed app
-#' @param name.token stored name of token
-#' @param name.secret stored name of secret
-#'
-#' @return deploy
-#' @export
-#'
-#' @examples
-#' # deploy_shiny()
-#'
-deploy_shiny <- function(path = here::here("app/"),
-                         account.name,
-                         name.app = "shiny_cast",
-                         name.token,
-                         name.secret) {
-  # Connecting
-  rsconnect::setAccountInfo(
-    name = account.name,
-    token = keyring::key_get(service = name.token),
-    secret = keyring::key_get(service = name.secret)
-  )
-
-  # Deploying
-  rsconnect::deployApp(appDir = path, lint = TRUE, appName = name.app, )
-}