From ed45f6e95d35a451f3167657bca9d3874ec054b0 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Todor=20Kondi=C4=87?= <todor.kondic@uni.lu>
Date: Sat, 2 May 2020 19:45:03 +0200
Subject: [PATCH] Add get_tags_from_txt
R/shiny-ui-config.R(rf$get_tags_from_txt): New reactive function.
---
R/shiny-ui-config.R | 7 +++++++
1 file changed, 7 insertions(+)
diff --git a/R/shiny-ui-config.R b/R/shiny-ui-config.R
index cf718c4..21b41c9 100644
--- a/R/shiny-ui-config.R
+++ b/R/shiny-ui-config.R
@@ -162,6 +162,13 @@ react_conf_f <- function(input,output,session,rv,rf) {
rv
})
+
+ rf$get_tags_from_txt <- react_f({
+ ## Tags in the text box.
+ txt2tags(input$tagsInp)
+ })
+
+
rf
}
--
GitLab