Skip to content
Snippets Groups Projects
Commit e559b561 authored by Jeremy Mathews's avatar Jeremy Mathews
Browse files

Full Blank Page Fix Post Testing

parent c917a5c3
Branches 1-BlankPage
Tags
2 merge requests!16Develop,!14Resolve "blank page on survival plot download"
Pipeline #3953 passed with stages
in 1 minute and 3 seconds
Hide whitespace changes
Inline Side-by-side
Showing
with 1 addition and 1 deletion
vizapp/server.R
+ 1
− 1
View file @ e559b561
...@@ -506,7 +506,7 @@ shinyServer( ...@@ -506,7 +506,7 @@ shinyServer(
filename = function() { paste0("plot", '.pdf') }, filename = function() { paste0("plot", '.pdf') },
content = function(file) { content = function(file) {
#ggsave(file = file, plot = plotInput(), device = "pdf") #ggsave(file = file, plot = plotInput(), device = "pdf")
pdf(file) pdf(file, onefile=FALSE)
plotInput() plotInput()
dev.off() dev.off()
} }
......
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment