elm-ui-widgets/tests/VerifyExamples/Widget/MultiSelect0.elm

47 lines
1.9 KiB
Elm
Raw Normal View History

2021-01-27 00:12:35 +03:00
module VerifyExamples.Widget.MultiSelect0 exposing (..)
-- This file got generated by [elm-verify-examples](https://github.com/stoeffel/elm-verify-examples).
-- Please don't modify this file by hand!
import Test
import Expect
import Widget exposing (..)
import Element
import Set
import Widget.Material as Material
type Msg
= ChangedSelected Int
spec0 : Test.Test
spec0 =
Test.test "#multiSelect: \n\n { selected = [1,2] |> Set.fromList\n , options =\n [ 1, 2, 42 ]\n |> List.map\n (\\int ->\n { text = String.fromInt int\n , icon = always Element.none\n }\n )\n , onSelect = (\\i -> Just <| ChangedSelected i)\n }\n |> Widget.multiSelect\n |> Widget.buttonRow\n { elementRow = Material.buttonRow\n , content = Material.toggleButton Material.defaultPalette\n }\n |> always \"Ignore this line\"\n --> \"Ignore this line\"" <|
\() ->
Expect.equal
(
{ selected = [1,2] |> Set.fromList
, options =
[ 1, 2, 42 ]
|> List.map
(\int ->
{ text = String.fromInt int
, icon = always Element.none
}
)
, onSelect = (\i -> Just <| ChangedSelected i)
}
|> Widget.multiSelect
|> Widget.buttonRow
{ elementRow = Material.buttonRow
, content = Material.toggleButton Material.defaultPalette
}
|> always "Ignore this line"
)
(
"Ignore this line"
)