blob: 4668ef4fa5cc1a39e1aa66046cdc4a9e600ace56 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
|
module Common.Model.CreateCategoryForm
( CreateCategoryForm(..)
) where
import Data.Aeson (FromJSON, ToJSON)
import Data.Text (Text)
import GHC.Generics (Generic)
data CreateCategoryForm = CreateCategoryForm
{ _createCategoryForm_name :: Text
, _createCategoryForm_color :: Text
} deriving (Show, Generic)
instance FromJSON CreateCategoryForm
instance ToJSON CreateCategoryForm
|
