plotly aws bug fix

agouy · Feb 2, 2021 · 6503390 · 6503390
1 parent f987815
commit 6503390
Showing 1 changed file with 7 additions and 0 deletions.
diff --git a/server.R b/server.R
@@ -544,6 +544,13 @@ shinyServer(function(input, output) {
       yaxis = list(title = "Locus")
     )
 
+    pdf(NULL)
+    dummy_dev_id = dev.cur()  
+    on.exit({
+      if (dummy_dev_id %in% dev.list()) {
+        dev.off(dummy_dev_id) 
+      } else warning("Dummy graphics device was closed by someone else. This should not have happened...")
+    })  
     (fig)
   })