src/client/Model/Message.elm


1
2
3
4
5
6
7
8

module Model.Message
  ( messageDecoder
  ) where

import Json.Decode exposing (..)

messageDecoder : Decoder String
messageDecoder = ("message" := string)