columnSelector: don't use deprecated scoped style

loosolab · Jan 9, 2018 · 7777d24 · 7777d24
1 parent a95c0cc
commit 7777d24
Show file tree

Hide file tree

Showing 2 changed files with 8 additions and 2 deletions.
diff --git a/R/columnSelector.R b/R/columnSelector.R
@@ -13,7 +13,8 @@ columnSelectorUI <- function(id, label = F, title = NULL) {
 
   shiny::tagList(
     shiny::tags$b(title),
-    shiny::HTML("<style scoped> div.selectize-input:not(.has-items) {background: #FFFFE1;} </style>"),
+    shinyjs::useShinyjs(),
+    shiny::singleton(shiny::tags$head(shiny::tags$link(rel = "stylesheet", type = "text/css", href = "wilson_www/styles.css"))),
     shiny::uiOutput(ns("out")),
     {if(label) shiny::uiOutput(ns("showLabel"))}
   )
@@ -78,9 +79,10 @@ columnSelector <- function(input, output, session, type.columns, type = NULL, co
     if(multiple) {
       columnSelectLabel = paste0(columnSelectLabel, "(s)")
     }
+
     shiny::tagList(
       shiny::selectInput(session$ns("select.type"), label = columnTypeLabel, choices = type.r(), selected = type.r()[1], multiple = FALSE),
-      shiny::selectizeInput(session$ns("select.column"), label = columnSelectLabel, choices = choices, multiple = multiple)
+      shiny::div(shiny::selectizeInput(session$ns("select.column"), label = columnSelectLabel, choices = choices, multiple = multiple), class = "empty") # colored background if empty
     )
   })
 

diff --git a/inst/www/styles.css b/inst/www/styles.css
@@ -100,3 +100,7 @@
 }
 
 /* text input */
+
+.empty > div .selectize-input:not(.has-items) {
+  background: #FFFFE1;
+}