Added onSessionEnded

dmenne · Sep 18, 2017 · 2faad04 · 2faad04
1 parent 2e2f1a0
commit 2faad04
Showing 1 changed file with 7 additions and 0 deletions.
diff --git a/inst/shiny/server.R b/inst/shiny/server.R
@@ -462,6 +462,13 @@ shinyServer(function(input, output, session) {
     }
   })
 
+  # Required for RInno
+  session$onSessionEnded(function() {
+    stopApp()
+    if (Sys.getenv("RSTUDIO") != "1")
+     q("no")
+  })
+
   # https://shiny.rstudio.com/articles/reconnecting.html
   session$allowReconnect(TRUE)