onasty/web/tests/UnitTests/Data/Me.elm(view raw)
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 |
module UnitTests.Data.Me exposing (suite)
import Data.Me
import Expect
import Json.Decode as Json
import Test exposing (Test, describe, test)
suite : Test
suite =
describe "Data.Me"
[ test "decode" <|
\_ ->
"""
{
"email": "admin@onasty.local",
"created_at": "2025-06-06T19:44:17.370068Z"
}
"""
|> Json.decodeString Data.Me.decode
|> Expect.ok
]
|