onasty @ 1994b67

module UnitTests.Data.Note exposing (suite)

import Data.Note
import Expect
import Json.Decode as D
import Test exposing (Test, describe, test)


suite : Test
suite =
    describe "Data.Note"
        [ test "decodeCreateResponse"
            (\_ ->
                "{\"slug\":\"the.note-slug\"}"
                    |> D.decodeString Data.Note.decodeCreateResponse
                    |> Expect.equal (Ok { slug = "the.note-slug" })
            )
        ]