module Common.Model.CreateCategory ( CreateCategory(..) ) where import Data.Aeson (FromJSON) import Data.Text (Text) import GHC.Generics (Generic) data CreateCategory = CreateCategory { _createCategory_name :: Text , _createCategory_color :: Text } deriving (Show, Generic) instance FromJSON CreateCategory