Elm Language Enchaîner des messages avec et puis


Exemple

La fonction andThen permet de mettre à jour la composition de l'appel. Peut être utilisé avec l'opérateur de pipeline ( |> ) pour enchaîner les mises à jour.

Exemple: Vous créez un éditeur de document et vous souhaitez que chaque message de modification que vous envoyez à votre document, vous l'enregistrez également:

import Update.Extra exposing (andThen)
import Update.Extra.Infix exposing (..)

-- type alias Model = [...]

type Message
    = ModifyDocumentWithSomeSettings
    | ModifyDocumentWithOtherSettings
    | SaveDocument

update : Model -> Message -> (Model, Cmd)
update model msg =
    case msg of
        ModifyDocumentWithSomeSettings ->
            -- make the modifications
            (modifiedModel, Cmd.none)
            |> andThen SaveDocument
        ModifyDocumentWithOtherSettings ->
            -- make other modifications
            (modifiedModel, Cmd.none)
            |> andThen SaveDocument
        SaveDocument ->
            -- save document code

Si vous importez également Update.Extra.Infix exposing (..) vous pourrez peut-être utiliser l'opérateur infixe:

update : Model -> Message -> (Model, Cmd)
update model msg =
    case msg of
        ModifyDocumentWithSomeSettings ->
            -- make the modifications
            (modifiedModel, Cmd.none)
            :> andThen SaveDocument
        ModifyDocumentWithOtherSettings ->
            -- make other modifications
            (modifiedModel, Cmd.none)
            :> SaveDocument
        SaveDocument ->
            -- save document code