Update components-data-viewer.R

fixing dropdown button
OHDSI · Oct 3, 2023 · b10f2f7 · b10f2f7
1 parent 6e7859a
commit b10f2f7
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/components-data-viewer.R b/R/components-data-viewer.R
@@ -334,7 +334,7 @@ function filterMinValue(rows, columnId, filterValue) {
         # Display message when dat is empty
         shiny::validate(shiny::need(hasData(data), "No data for selection"))
         # set row height based on nchar of table
-        if(max(apply(data, 1, function(x) max(nchar(x))), na.rm = T) < 100){
+        if(max(apply(data, 1, function(x) max(nchar(x))), na.rm = T) < 120){
           height <- 40*3
         } else{
           height <- NULL