diff options
author | Joris | 2019-10-20 12:02:21 +0200 |
---|---|---|
committer | Joris | 2019-10-20 12:02:21 +0200 |
commit | 7aadcc97f9df0e2daccbe8a8726d8bc6c63d67f4 (patch) | |
tree | 3637cc06f6378fc3ea04844f15fe43bc04155007 /common/src/Common/Model/EditIncomeForm.hs | |
parent | 6e9e34e92a244ab6c38d135d46f9f5bb01391906 (diff) | |
download | budget-7aadcc97f9df0e2daccbe8a8726d8bc6c63d67f4.tar.gz budget-7aadcc97f9df0e2daccbe8a8726d8bc6c63d67f4.tar.bz2 budget-7aadcc97f9df0e2daccbe8a8726d8bc6c63d67f4.zip |
Add income
Diffstat (limited to 'common/src/Common/Model/EditIncomeForm.hs')
-rw-r--r-- | common/src/Common/Model/EditIncomeForm.hs | 18 |
1 files changed, 18 insertions, 0 deletions
diff --git a/common/src/Common/Model/EditIncomeForm.hs b/common/src/Common/Model/EditIncomeForm.hs new file mode 100644 index 0000000..ff975fc --- /dev/null +++ b/common/src/Common/Model/EditIncomeForm.hs @@ -0,0 +1,18 @@ +module Common.Model.EditIncomeForm + ( EditIncomeForm(..) + ) where + +import Data.Aeson (FromJSON, ToJSON) +import Data.Text (Text) +import GHC.Generics (Generic) + +import Common.Model.Income (IncomeId) + +data EditIncomeForm = EditIncomeForm + { _editIncomeForm_id :: IncomeId + , _editIncomeForm_amount :: Text + , _editIncomeForm_date :: Text + } deriving (Show, Generic) + +instance FromJSON EditIncomeForm +instance ToJSON EditIncomeForm |