diff options
| author | Joris | 2016-06-26 12:31:24 +0200 |
|---|---|---|
| committer | Joris | 2016-06-26 12:31:24 +0200 |
| commit | 9ec84e3a20c767f6525639f58cd22715e302b88d (patch) | |
| tree | a080552859180707472c1a289080857c0a54fc06 /src/server/Model/Json/Payment.hs | |
| parent | 5cb36652ccf07c9e0995ebc421a837ad7d258469 (diff) | |
| download | budget-9ec84e3a20c767f6525639f58cd22715e302b88d.tar.gz budget-9ec84e3a20c767f6525639f58cd22715e302b88d.tar.bz2 budget-9ec84e3a20c767f6525639f58cd22715e302b88d.zip | |
Add an editable date field for punctual payment creation
Diffstat (limited to 'src/server/Model/Json/Payment.hs')
| -rw-r--r-- | src/server/Model/Json/Payment.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/server/Model/Json/Payment.hs b/src/server/Model/Json/Payment.hs index 7f4de15..04c6de8 100644 --- a/src/server/Model/Json/Payment.hs +++ b/src/server/Model/Json/Payment.hs @@ -6,16 +6,16 @@ module Model.Json.Payment import GHC.Generics -import Data.Time import Data.Text (Text) import Data.Aeson +import Data.Time.Calendar (Day) import Model.Database (PaymentId, UserId) import Model.Frequency data Payment = Payment { id :: PaymentId - , creation :: UTCTime + , date :: Day , name :: Text , cost :: Int , userId :: UserId |