github/shiny
1
1
Fork 0
mirror of https://github.com/rstudio/shiny.git synced 2026-04-29 03:00:45 -04:00
Code Issues Packages Projects Releases Wiki Activity

Fix value assignment of text area input

Browse Source
This commit is contained in:
Nuno Agostinho
2016-05-26 00:30:34 +01:00
committed by Winston Chang
parent 680b2323d5
commit 3dee62105e
1 changed files with 2 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
R/input-textarea.R
View File

@@ -35,7 +35,7 @@ textAreaInput <- function(inputId, label, value = "", width = NULL,
div(class = "form-group shiny-input-container",
style = if (!is.null(width)) paste0("width: ", validateCssUnit(width), ";"),
label %AND% tags$label(label, `for` = inputId),
tags$textarea(id = inputId, class = "form-control", value = value,
placeholder = placeholder)
tags$textarea(id = inputId, class = "form-control", placeholder = placeholder,
paste(value, collapse = "\n")
)
}