Elm:提交时清除表单

Question

我有一个带有一个字段的简单表单。我想清除表单提交上的字段。我正在我的更新功能中清除我的模型，但文本仍保留在文本输入中。

type alias Model =
    { currentSpelling : String }

type Msg
    = MorePlease

update : Msg -> Model -> ( Model, Cmd Msg )
update msg model =
    case msg of
        MorePlease ->
            (  log "cleared spelling: " { model | currentSpelling = "" }
                , fetchWord model.currentSpelling )

view : Model -> Html Msg
view model =
    div []
        [ Html.form [ onSubmit MorePlease ]
            [ input [ type' "text"
                    , placeholder "Search for your word here"
                    , onInput NewSpelling
                    , attribute "autofocus" ""
                    ] []
            , text model.currentSpelling
            , input [ type' "submit" ] [ text "submit!" ]
            ]
        ]

text显示 model.currentSpelling当我用更新功能清空它时清除它，但文本输入框仍然填充。知道如何清除它吗？
fetchWord进行 HTTP 调用，但此处省略。

Answer 1

添加 value model.currentSpelling进入属性
输入元素。这就是你如何控制字符串
在 html 中的 input 元素内部。