andreas/FreesearchR
1
0
Fork 0
mirror of https://github.com/agdamsbo/FreesearchR.git synced 2025-09-12 09:59:39 +02:00
Code Issues Projects Releases Packages Wiki Activity Actions 1

no type or clase if missing

Browse source
This commit is contained in:
Andreas Gammelgaard Damsbo 2025-03-20 13:12:38 +01:00
parent b945b6af33
commit 2495da555a
No known key found for this signature in database
2 changed files with 7 additions and 5 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
R/app_version.R
View file

@ -1 +1 @@
app_version <- function()'250320_1144' app_version <- function()'250320_1310'

10
R/custom_SelectInput.R
View file

@ -64,13 +64,16 @@ columnSelectInput <- function(inputId, label, data, selected = "", ...,
return '<div style=\"padding: 3px 12px\">' + return '<div style=\"padding: 3px 12px\">' +
'<div><strong>' + '<div><strong>' +
escape(item.data.name) + ' ' + escape(item.data.name) + ' ' +
'</strong>' +
(item.data.dataclass != '' ?
'<span style=\"opacity: 0.9;\"><code style=\"color: black;\"> ' + '<span style=\"opacity: 0.9;\"><code style=\"color: black;\"> ' +
item.data.dataclass + item.data.dataclass +
'</code></span>' + ' ' + '</code></span>' : '' ) + ' ' +
(item.data.datatype != '' ?
'<span style=\"opacity: 0.9;\"><code style=\"color: black;\"> ' + '<span style=\"opacity: 0.9;\"><code style=\"color: black;\"> ' +
item.data.datatype + item.data.datatype +
'</code></span>' + '</code></span>' : '' ) +
'</strong></div>' + '</div>' +
(item.data.label != '' ? '<div style=\"line-height: 1em;\"><small>' + escape(item.data.label) + '</small></div>' : '') + (item.data.label != '' ? '<div style=\"line-height: 1em;\"><small>' + escape(item.data.label) + '</small></div>' : '') +
'</div>'; '</div>';
}, },
@ -89,7 +92,6 @@ columnSelectInput <- function(inputId, label, data, selected = "", ...,
} }
#' A selectizeInput customized for named vectors #' A selectizeInput customized for named vectors
#' #'
#' @param inputId passed to \code{\link[shiny]{selectizeInput}} #' @param inputId passed to \code{\link[shiny]{selectizeInput}}