diff --git a/modules/webapp/src/main/elm/Comp/ItemDetail.elm b/modules/webapp/src/main/elm/Comp/ItemDetail.elm index b36f71fe..dfdb13fe 100644 --- a/modules/webapp/src/main/elm/Comp/ItemDetail.elm +++ b/modules/webapp/src/main/elm/Comp/ItemDetail.elm @@ -1278,8 +1278,9 @@ renderEditForm model = [ rows 6 , autocomplete False , onInput SetNotes + , Maybe.withDefault "" model.notesModel |> value ] - [ Maybe.withDefault "" model.notesModel |> text ] + [] , button [ class "ui icon button", onClick SaveNotes ] [ i [ class "save outline icon" ] [] ] diff --git a/modules/webapp/src/main/elm/Comp/ItemMail.elm b/modules/webapp/src/main/elm/Comp/ItemMail.elm index 0aeea8b3..47d0cb4e 100644 --- a/modules/webapp/src/main/elm/Comp/ItemMail.elm +++ b/modules/webapp/src/main/elm/Comp/ItemMail.elm @@ -205,8 +205,11 @@ view model = ] , div [ class "field" ] [ label [] [ text "Body" ] - , textarea [ onInput SetBody ] - [ text model.body ] + , textarea + [ onInput SetBody + , value model.body + ] + [] ] , div [ class "inline field" ] [ div [ class "ui checkbox" ] diff --git a/modules/webapp/src/main/elm/Comp/OrgForm.elm b/modules/webapp/src/main/elm/Comp/OrgForm.elm index da1b9861..ce6fab9e 100644 --- a/modules/webapp/src/main/elm/Comp/OrgForm.elm +++ b/modules/webapp/src/main/elm/Comp/OrgForm.elm @@ -136,6 +136,10 @@ view model = [ text "Notes" ] , div [ class "field" ] - [ textarea [ onInput SetNotes ] [ Maybe.withDefault "" model.notes |> text ] + [ textarea + [ onInput SetNotes + , Maybe.withDefault "" model.notes |> value + ] + [] ] ] diff --git a/modules/webapp/src/main/elm/Comp/PersonForm.elm b/modules/webapp/src/main/elm/Comp/PersonForm.elm index 25680aa2..9be47281 100644 --- a/modules/webapp/src/main/elm/Comp/PersonForm.elm +++ b/modules/webapp/src/main/elm/Comp/PersonForm.elm @@ -161,6 +161,10 @@ view model = [ text "Notes" ] , div [ class "field" ] - [ textarea [ onInput SetNotes ] [ Maybe.withDefault "" model.notes |> text ] + [ textarea + [ onInput SetNotes + , Maybe.withDefault "" model.notes |> value + ] + [] ] ] diff --git a/modules/webapp/src/main/elm/Comp/SourceForm.elm b/modules/webapp/src/main/elm/Comp/SourceForm.elm index 50568f40..3df00439 100644 --- a/modules/webapp/src/main/elm/Comp/SourceForm.elm +++ b/modules/webapp/src/main/elm/Comp/SourceForm.elm @@ -152,7 +152,11 @@ view flags model = ] , div [ class "field" ] [ label [] [ text "Description" ] - , textarea [ onInput SetDescr ] [ model.description |> Maybe.withDefault "" |> text ] + , textarea + [ onInput SetDescr + , model.description |> Maybe.withDefault "" |> value + ] + [] ] , div [ class "inline field" ] [ div [ class "ui checkbox" ]