module Common.Model.EditCategory ( EditCategory(..) ) where import Data.Aeson (FromJSON) import Data.Text (Text) import GHC.Generics (Generic) import Common.Model.Category (CategoryId) data EditCategory = EditCategory { _editCategory_id :: CategoryId , _editCategory_name :: Text , _editCategory_color :: Text } deriving (Show, Generic) instance FromJSON EditCategory