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/Message/Key.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/Message/Key.hs')
-rw-r--r-- | src/server/Model/Message/Key.hs | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/src/server/Model/Message/Key.hs b/src/server/Model/Message/Key.hs index 8b957f1..093024b 100644 --- a/src/server/Model/Message/Key.hs +++ b/src/server/Model/Message/Key.hs @@ -75,6 +75,7 @@ data Key = | PaymentName | PaymentCost + | PaymentDate | PaymentPunctual | PaymentMonthly @@ -90,7 +91,7 @@ data Key = | Income | MonthlyNetIncomes | IncomeNotDeleted - | IncomeCreation + | IncomeDate | IncomeAmount | ConfirmDelete @@ -117,4 +118,4 @@ data Key = deriving (Enum, Bounded, Show) instance Json.ToJSON Key where - toJSON = Json.String . T.pack . show + toJSON = Json.String . T.pack . show |