Commit 10f5bd60 authored by Aroon Chande's avatar Aroon Chande

Render download button on complete

parent 5b11ed98
Pipeline #37 passed with stage
in 24 seconds
......@@ -129,6 +129,12 @@ shinyServer(function(input, output, session) {
output$plot = renderPlot({
annotPlot()
})
output$buttons <- renderUI({
downloadButton('dlFasta', 'Download Fasta Amino Acid',
class = 'btn btn-primary btn-large')
downloadButton('dlPreds', 'Download predicted T6SS proteins',
class = 'btn btn-primary btn-large')
})
output$dlFasta = downloadHandler(
filename = function() {
paste("proteins",
......
......@@ -90,10 +90,7 @@ shinyUI(
tags$hr(),
plotOutput("plot"),
tags$hr(),
downloadButton('dlFasta', 'Download Fasta Amino Acid',
class = 'btn btn-primary btn-large'),
downloadButton('dlPreds', 'Download predicted T6SS proteins',
class = 'btn btn-primary btn-large')
uiOutput("buttons")
)
),
......
Markdown is supported
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