Compare commits
2 Commits
| Author | SHA1 | Date | |
|---|---|---|---|
| a2b2231503 | |||
| 665d6a8cfa |
@@ -1,6 +1,6 @@
|
|||||||
Package: AVSDevR.A11yShinyInputs
|
Package: AVSDevR.A11yShinyInputs
|
||||||
Title: Accesible Alternatives to Shiny Inputs
|
Title: Accesible Alternatives to Shiny Inputs
|
||||||
Version: 1.0.2
|
Version: 1.0.3
|
||||||
Authors@R:
|
Authors@R:
|
||||||
person("Craig", "Williams", , "craig@avsdev.uk", role = c("aut", "cre"))
|
person("Craig", "Williams", , "craig@avsdev.uk", role = c("aut", "cre"))
|
||||||
Description: Provides accessible alternatives to shiny inputs such as the radio
|
Description: Provides accessible alternatives to shiny inputs such as the radio
|
||||||
|
|||||||
@@ -41,7 +41,8 @@ a11yFileInput <- function(
|
|||||||
if (!is.null(capture)) {
|
if (!is.null(capture)) {
|
||||||
inputTag$attribs$capture <- capture
|
inputTag$attribs$capture <- capture
|
||||||
}
|
}
|
||||||
htmltools::tags$div(
|
|
||||||
|
output_tags <- htmltools::tags$div(
|
||||||
class = "form-group shiny-input-container",
|
class = "form-group shiny-input-container",
|
||||||
style = htmltools::css(width = htmltools::validateCssUnit(width)),
|
style = htmltools::css(width = htmltools::validateCssUnit(width)),
|
||||||
htmltools::tags$label(
|
htmltools::tags$label(
|
||||||
@@ -79,4 +80,6 @@ a11yFileInput <- function(
|
|||||||
htmltools::tags$div(class = "progress-bar")
|
htmltools::tags$div(class = "progress-bar")
|
||||||
)
|
)
|
||||||
)
|
)
|
||||||
|
|
||||||
|
htmltools::attachDependencies(output_tags, a11yShinyInputsDependency())
|
||||||
}
|
}
|
||||||
|
|||||||
Reference in New Issue
Block a user