src/Model/Identity.hs


1
2
3
4
5
6
7
8
9
10
11
12
13
14

{-# LANGUAGE DeriveGeneric #-}

module Model.Identity where

import           Data.Yaml
import           GHC.Generics

data Identity = Identity
  { name    :: String
  , website :: String
  , git     :: String
  } deriving (Show, Read, Eq, Generic)

instance FromJSON Identity