Use 'value' for textarea inputs
Signed-off-by: Danila Fedorin <danila.fedorin@gmail.com>
This commit is contained in:
parent
7d07b2dee9
commit
287562619d
|
@ -243,8 +243,8 @@ view m =
|
||||||
, viewSection "Rules" <| Html.div [] <|
|
, viewSection "Rules" <| Html.div [] <|
|
||||||
[ viewTabSelector m.tab [(Rendered, "Rendered"), (Editor, "Editor"), (MetaEditor, "Presentation Rules")]
|
[ viewTabSelector m.tab [(Rendered, "Rendered"), (Editor, "Editor"), (MetaEditor, "Presentation Rules")]
|
||||||
, viewTab m.tab
|
, viewTab m.tab
|
||||||
(Html.textarea [ onInput SetProgram ] [ Html.text m.program ])
|
(Html.textarea [ onInput SetProgram, value m.program ] [ ])
|
||||||
(Html.textarea [ onInput SetRenderProgram ] [ Html.text m.renderProgram ])
|
(Html.textarea [ onInput SetRenderProgram, value m.renderProgram ] [ ])
|
||||||
(Html.Lazy.lazy2 viewRules m.renderProgram m.program)
|
(Html.Lazy.lazy2 viewRules m.renderProgram m.program)
|
||||||
] ++
|
] ++
|
||||||
viewIfError progsOrErr
|
viewIfError progsOrErr
|
||||||
|
|
Loading…
Reference in New Issue
Block a user