diff --git a/R/shiny-ui-base.R b/R/shiny-ui-base.R index 37ac4e552de5f278384cec4c0807ffed0efc8cf4..a7ad77f8292fb765cfea82dcd4155ca4e77f3617 100644 --- a/R/shiny-ui-base.R +++ b/R/shiny-ui-base.R @@ -21,6 +21,7 @@ obsrv <- shiny::observe obsrv_e <- shiny::observeEvent vols <- shinyFiles::getVolumes vol_f <- vols() +volumes <- shinyFiles::getVolumes() validate1 <- function(expr,msg) shiny::validate(need(expr,msg))