From cfb1be9a7d912b468d4463f67a8c40656cef27d1 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Todor=20Kondi=C4=87?= <todor.kondic@uni.lu>
Date: Sat, 2 May 2020 07:03:54 +0200
Subject: [PATCH] Add volumes function

R/shiny-ui-base.R(volumes): New function.

The result for shinyFiles::getVolumes().
---
 R/shiny-ui-base.R | 1 +
 1 file changed, 1 insertion(+)

diff --git a/R/shiny-ui-base.R b/R/shiny-ui-base.R
index 37ac4e5..a7ad77f 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))
 
 
-- 
GitLab