module Common.Model.EditCategoryForm ( EditCategoryForm(..) ) where import Data.Aeson (FromJSON, ToJSON) import Data.Text (Text) import GHC.Generics (Generic) import Common.Model.Category (CategoryId) data EditCategoryForm = EditCategoryForm { _editCategoryForm_id :: CategoryId , _editCategoryForm_name :: Text , _editCategoryForm_color :: Text } deriving (Show, Generic) instance FromJSON EditCategoryForm instance ToJSON EditCategoryForm