add 'value' attrib with text for multiline.
commit561e554048b613d5df32e33b6c9946efc8a1e86c
authorBen Burdette <bburdette@gmail.com>
dateMon 3 Jun 2019, 09:39 (7 years ago)
parent7ef9985
src/Element/Input.elm+1−1
@@ -759,7 +759,7 @@ textHelper textInput attrs textOptions =
759759 TextArea ->
760760 let
761761 { maybePadding, heightContent, maybeSpacing, adjustedAttributes, maybeBorder } =
762− attributes
762+ (value textOptions.text :: attributes)
763763 |> List.foldr
764764 (\attr found ->
765765 case attr of