summaryrefslogtreecommitdiff
path: root/elm/Lib/Html.elm
diff options
context:
space:
mode:
Diffstat (limited to 'elm/Lib/Html.elm')
-rw-r--r--elm/Lib/Html.elm3
1 files changed, 2 insertions, 1 deletions
diff --git a/elm/Lib/Html.elm b/elm/Lib/Html.elm
index 2d7d516c..440abd00 100644
--- a/elm/Lib/Html.elm
+++ b/elm/Lib/Html.elm
@@ -125,10 +125,11 @@ inputTextArea nam val onch attrs = textarea (
, onInput onch
, rows 4
, cols 50
+ , value val
]
++ attrs
++ (if nam == "" then [] else [ id nam, name nam ])
- ) [ text val ]
+ ) []
inputCheck : String -> Bool -> (Bool -> m) -> Html m