diff options
author | Naeem Model <me@nmode.ca> | 2023-06-25 01:57:27 +0000 |
---|---|---|
committer | Naeem Model <me@nmode.ca> | 2023-06-25 01:57:27 +0000 |
commit | eac4c3ce4344ec3a4b515250cb7b3aa18ce9db8e (patch) | |
tree | 819dcea1a9e486eab89db715fb138fccc79443a6 /R/server.R | |
parent | 4e1ddb4ade80ac5193e08fea66c594600ab8b324 (diff) |
Remove 'shinyjs' dependency
Diffstat (limited to 'R/server.R')
-rw-r--r-- | R/server.R | 13 |
1 files changed, 0 insertions, 13 deletions
@@ -1,19 +1,6 @@ #' @importFrom methods is #' @importFrom utils read.csv write.csv server <- function(input, output) { - # Hide the sidebar if the 'About' tab is active. - shiny::observeEvent(input$tabset, { - if (input$tabset == "About") { - shinyjs::hideElement(selector="#sidebar") - shinyjs::removeCssClass("main", "col-sm-8") - shinyjs::addCssClass("main", "col-sm-12") - } else { - shinyjs::showElement(selector="#sidebar") - shinyjs::removeCssClass("main", "col-sm-12") - shinyjs::addCssClass("main", "col-sm-8") - } - }) - reactive <- shiny::reactiveValues( data_table=data.frame(Name=character(0), `Reporting Frequency`=character(0), `Case Counts`=numeric(0), check.names=FALSE), est_table=data.frame(Dataset=character(0)), |