initial-state-test.elm

module WebSocketTests exposing (..)

import Test exposing (..)
import Expect
import Elmer exposing (hasLength)
import Elmer.Html as Markup
import Elmer.Html.Matchers exposing (elements)
import App

viewTests : Test
viewTests =
  describe "initial view"
  [ test "it shows no items" <|
    \() ->
      Elmer.given App.defaultModel App.view App.update
        |> Markup.target "#items li"
        |> Markup.expect (elements <| hasLength 0)
  ]