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

56 lines
2.7 KiB
Elm
Raw Permalink Normal View History

2021-02-03 00:22:10 +03:00
module VerifyExamples.Widget.ExpansionItem0 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 Widget.Material as Material
import Element
type Msg =
Toggle Bool
spec0 : Test.Test
spec0 =
2021-02-05 22:49:17 +03:00
Test.test "#expansionItem: \n\n let\n isExpanded : Bool\n isExpanded =\n True\n in\n ( ( Widget.fullBleedItem (Material.fullBleedItem Material.defaultPalette)\n { onPress = Nothing\n , icon = always Element.none\n , text = \"Item with Icon\"\n }\n )\n :: Widget.expansionItem (Material.expansionItem Material.defaultPalette )\n { onToggle = Toggle\n , isExpanded = isExpanded\n , icon = always Element.none\n , text = \"Expandable Item\"\n , content =\n [ Widget.fullBleedItem (Material.fullBleedItem Material.defaultPalette)\n { onPress = Nothing\n , icon = always Element.none\n , text = \"Item with Icon\"\n }\n ]\n }\n )\n |> Widget.itemList (Material.cardColumn Material.defaultPalette)\n |> always \"Ignore this line\"\n --> \"Ignore this line\"" <|
2021-02-03 00:22:10 +03:00
\() ->
Expect.equal
(
let
isExpanded : Bool
isExpanded =
True
in
2021-02-05 22:49:17 +03:00
( ( Widget.fullBleedItem (Material.fullBleedItem Material.defaultPalette)
2021-02-03 00:22:10 +03:00
{ onPress = Nothing
, icon = always Element.none
, text = "Item with Icon"
}
2021-02-05 22:49:17 +03:00
)
:: Widget.expansionItem (Material.expansionItem Material.defaultPalette )
2021-02-03 00:22:10 +03:00
{ onToggle = Toggle
, isExpanded = isExpanded
, icon = always Element.none
, text = "Expandable Item"
, content =
2021-02-05 18:59:34 +03:00
[ Widget.fullBleedItem (Material.fullBleedItem Material.defaultPalette)
2021-02-03 00:22:10 +03:00
{ onPress = Nothing
, icon = always Element.none
, text = "Item with Icon"
}
]
}
)
|> Widget.itemList (Material.cardColumn Material.defaultPalette)
|> always "Ignore this line"
)
(
"Ignore this line"
)