add miniUI and future to suggests

MichelNivard · Aug 31, 2024 · dee7541 · dee7541
1 parent c90a94f
commit dee7541
Show file tree

Hide file tree

Showing 3 changed files with 4 additions and 0 deletions.
diff --git a/DESCRIPTION b/DESCRIPTION
@@ -44,8 +44,10 @@ Imports:
     yaml
 Suggests: 
     AzureRMR,
+    future,
     grDevices,
     knitr,
+    miniUI,
     mockr,
     promises,
     rmarkdown,

diff --git a/R/addin_chatgpt.R b/R/addin_chatgpt.R
@@ -26,6 +26,7 @@
 #' gptstudio_chat()
 #' }
 gptstudio_chat <- function(host = getOption("shiny.host", "127.0.0.1")) {
+  check_installed(c("miniUI", "future"))
   rstudioapi::verifyAvailable()
 
   port <- find_available_port()

diff --git a/R/run_chatgpt_app.R b/R/run_chatgpt_app.R
@@ -13,6 +13,7 @@ gptstudio_run_chat_app <- function(ide_colors = get_ide_theme_info(),
                                    code_theme_url = get_highlightjs_theme(),
                                    host = getOption("shiny.host", "127.0.0.1"),
                                    port = getOption("shiny.port")) {
+  check_installed("future")
   ui <- mod_app_ui("app", ide_colors, code_theme_url)
 
   server <- function(input, output, session) {