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/CreateIncomeForm.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/CreateIncomeForm.hs')
| -rw-r--r-- | common/src/Common/Model/CreateIncomeForm.hs | 15 |
1 files changed, 15 insertions, 0 deletions
diff --git a/common/src/Common/Model/CreateIncomeForm.hs b/common/src/Common/Model/CreateIncomeForm.hs new file mode 100644 index 0000000..e83bf0a --- /dev/null +++ b/common/src/Common/Model/CreateIncomeForm.hs @@ -0,0 +1,15 @@ +module Common.Model.CreateIncomeForm + ( CreateIncomeForm(..) + ) where + +import Data.Aeson (FromJSON, ToJSON) +import Data.Text (Text) +import GHC.Generics (Generic) + +data CreateIncomeForm = CreateIncomeForm + { _createIncomeForm_amount :: Text + , _createIncomeForm_date :: Text + } deriving (Show, Generic) + +instance FromJSON CreateIncomeForm +instance ToJSON CreateIncomeForm |