all repos

onasty @ 234f764

a one-time notes service

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
        ]