This is an alternative site for discovering Elm packages. You may be looking for the official Elm package site instead.
1.0.0 1.1.0
We were not able to find the expected elm-package.json file at this tag.
Tag 2.0.0
Committed At 2018-11-18 05:16:39 UTC

Modules

    README

    Build Status

    Test Elm Programs

    elm-program-test provides a convenient API that works with elm-test and elm-html-test for testing your Elm programs as complete units.

    Basic example

    In this example, TestContext.create is used to initiate testing of the imagined MyProgram module (which follows the Elm architecture). Then clickButton is used to simulate user interaction with the program, and finally expectViewHas is used to assert the final state of the program's displayed HTML.

    import Test exposing (..)
    import Test.Html.Selector exposing (class, text)
    import TestContext exposing (clickButton, expectViewHas)
    import MyProgram -- just an imaginary example
    
    exampleProgramTest : Test
    exampleProgramTest =
        test "cannot publish without a title" <|
            \() ->
                TestContext.create
                    { init = MyProgram.init
                    , update = MyProgram.update
                    , view = MyProgram.view
                    }
                    |> clickButton "New Post"
                    |> clickButton "Publish"
                    |> expectViewHas
                        [ class "invalid-article"
                        , text "You must provide a title before publishing"
                        ]
    

    Testing programs with flags and/or navigation

    This example tests a program that requires both flags and navigation. There are variants of the TestContext.create* functions (see all) for all combinations of flags and/or navigation that a program might required.

    import Test exposing (..)
    import Test.Html.Selector exposing (class, text)
    import TestContext exposing (clickButton, expectViewHas)
    import MyProgram exposing (Flags, Msg, Model) -- just an imaginary example
    
    start : String -> Flags ->  TestContext Msg Model (Cmd Msg)
    start initialUrl flags =
        TestContext.createWithNavigationAndFlags
            MyProgram.OnRouteChange -- this is a constructor of MyProgram.Msg that is also used by Navigation.program
            { init = MyProgram.init -- the type of MyProgram.init is: MyProgram.Flags -> Navigation.Location -> (MyProgram.Model, Cmd MyProgram.Msg)
            , update = MyProgram.update
            , view = MyProgram.view
            }
            initialUrl
            flags
    
    exampleProgramTest : Test
    exampleProgramTest =
        test "pages show social media link at the end" <|
            \() ->
                start "https://my-program.example.com/page/9" MyProgram.defaultFlags
                    |> clickButton "Read More"
                    |> expectViewHas
                        [ class "super-social-link"
                        , attribute (href "https://super.social.example.com/avh4")
                        ]
    

    Testing view modules (not full programs)

    You can also use elm-program-test to test things that aren't programs by creating a trivial program.

    This example tests a module for a complicated view by making a program with a trivial update function:

    import DateTimePicker -- using abadi199/datetimepicker 6.0.0 as an example of a view to test
    import Test exposing (..)
    import Test.Html.Selector exposing (text)
    import TestContext exposing (clickButton, expectViewHas)
    
    startDatePicker :
        TestContext
            (DateTimePicker.State, Maybe Date) -- msg: in this trivial program, the msg is simply the new model value
            (DateTimePicker.State, Maybe Date) -- model: simply the state needed by the view being tested
            (Cmd never) -- effect: could use any type here, but Cmd seems least confusing
    startDatePicker =
        TestContext.create
            { init = ((DateTimePicker.initialState, Nothing), Cmd.none)
            , update = newState model -> (newState, Cmd.none)
            , view =
                \(state, value) ->
                    DateTimePicker.dateTimePicker (,) [] state value
            }
    
    datePickerTest : Test
    datePickerTest =
        test "" <|
            \() ->
                startDatePicker
                    |> clickButton "Next Month"
                    |> expectViewHas [ text "April 2018" ]