Merge pull request #571 from Sage-Bionetworks/dev-manifest-generate-error

Dev manifest generate error

Author: afwillia

server.R

@@ -598,6 +598,7 @@ shinyServer(function(input, output, session) {
     .use_annotations <- dcc_config_react()$manifest_use_annotations
 
     promises::future_promise({
+      try({
       switch(dca_schematic_api, 
         rest = manifest_generate(
           url=.url,
@@ -617,14 +618,26 @@ shinyServer(function(input, output, session) {
           tibble(a="b", c="d")
         }
       )
+      }, silent = TRUE)
     }) %...>% manifest_data()
 
   })
 
   observeEvent(manifest_data(), {
-    if (dcc_config_react()$manifest_output_format == "google_sheet") {
-      shinyjs::show("div_template")
-    } else shinyjs::show("div_download_data")
+    if (inherits(manifest_data(), "try-error")) {
+      nx_report_error("Failed to get manifest",
+                      tagList(
+                        p("There was a problem downloading the manifest."),
+                        p("Try again or contact the DCC for help"),
+                        p("For debugging: ", manifest_data())
+                      ))
+      shinyjs::enable("btn_template_select")
+      updateTabsetPanel(session, "tab_template_select")
+    } else {
+      if (dcc_config_react()$manifest_output_format == "google_sheet") {
+        shinyjs::show("div_template")
+      } else shinyjs::show("div_download_data")
+    }
     dcWaiter("hide")
   })