Don't attempt to call Shiny app if app is NULL

Squelches a non-useful user-facing error message when a Shiny app has been interrupted but a HTTP request is still in progress in the app iframe.
posit-dev · Nov 27, 2023 · 4eacfeb · 4eacfeb
1 parent a504138
commit 4eacfeb
Showing 1 changed file with 9 additions and 7 deletions.
diff --git a/src/messageporthttp.ts b/src/messageporthttp.ts
@@ -318,14 +318,16 @@ async function handleHttpuvRequests(
           tryCatch(
             {
               app <- get(appName, env = .shiny_app_registry)
-              app$call(
-                list(
-                  PATH_INFO = "${scope.path}",
-                  REQUEST_METHOD = "${scope.method}",
-                  QUERY_STRING = "${scope.query_string}",
-                  rook.input = reader
+              if (!is.null(app)) {
+                app$call(
+                  list(
+                    PATH_INFO = "${scope.path}",
+                    REQUEST_METHOD = "${scope.method}",
+                    QUERY_STRING = "${scope.query_string}",
+                    rook.input = reader
+                  )
                 )
-              )
+              }
             },
             finally = {
               reader$destroy()