module Common.Model.EditIncome ( EditIncome(..) ) where import Data.Aeson (FromJSON) import Data.Time.Calendar (Day) import GHC.Generics (Generic) import Common.Model.Income (IncomeId) data EditIncome = EditIncome { _editIncome_id :: IncomeId , _editIncome_date :: Day , _editIncome_amount :: Int } deriving (Show, Generic) instance FromJSON EditIncome