Textarea value

unisonweb · Dec 5, 2023 · 5417d0a · 5417d0a
1 parent 6018f03
commit 5417d0a
Showing 1 changed file with 2 additions and 1 deletion.
diff --git a/src/UI/Form/TextField.elm b/src/UI/Form/TextField.elm
@@ -233,7 +233,8 @@ view textField =
 
  input__ =
  if textField.rows > 1 then
- textarea (rows textField.rows :: attrs) [ text textField.value ]
+ -- textarea (rows textField.rows :: attrs) [ text textField.value ]
+ textarea (value textField.value :: rows textField.rows :: attrs) []
 
  else
  input (value textField.value :: type_ "text" :: attrs) []