From cfca18262c1ff48dcb683ddab7d03cf8e55573ff Mon Sep 17 00:00:00 2001
From: Joris
Date: Fri, 24 Mar 2017 09:21:04 +0000
Subject: Features/categories

---
 src/server/Model/Message/Key.hs | 29 ++++++++++++++++++++++++++++-
 1 file changed, 28 insertions(+), 1 deletion(-)

(limited to 'src/server/Model/Message/Key.hs')

diff --git a/src/server/Model/Message/Key.hs b/src/server/Model/Message/Key.hs
index d00d8b8..36b3ba0 100644
--- a/src/server/Model/Message/Key.hs
+++ b/src/server/Model/Message/Key.hs
@@ -77,6 +77,8 @@ data Key =
 
   | PaymentName
   | PaymentCost
+  | PaymentDate
+  | PaymentCategory
   | PaymentPunctual
   | PaymentMonthly
 
@@ -85,6 +87,20 @@ data Key =
   | Delete
   | ConfirmPaymentDelete
 
+  -- Categories
+
+  | Categories
+  | NoCategories
+  | CategoryNotDeleted
+  | AddCategory
+  | CloneCategory
+  | EditCategory
+  | ConfirmCategoryDelete
+  | CategoryName
+  | CategoryColor
+  | Color
+  | UsedCategory
+
   -- Statistics
 
   | Statistics
@@ -94,6 +110,7 @@ data Key =
   -- Income
 
   | CumulativeIncomesSince
+  | NoIncome
   | Income
   | MonthlyNetIncomes
   | AddIncome
@@ -101,6 +118,7 @@ data Key =
   | EditIncome
   | IncomeNotDeleted
   | IncomeAmount
+  | IncomeDate
   | ConfirmIncomeDelete
   | Add
 
@@ -110,6 +128,7 @@ data Key =
   | InvalidString
   | InvalidDate
   | InvalidInt
+  | InvalidCategory
   | SmallerIntThan
   | GreaterIntThan
 
@@ -121,6 +140,9 @@ data Key =
   | CreateIncomeError
   | EditIncomeError
   | DeleteIncomeError
+  | CreateCategoryError
+  | EditCategoryError
+  | DeleteCategoryError
   | SignOutError
 
   -- Dialog
@@ -128,6 +150,10 @@ data Key =
   | Confirm
   | Undo
 
+  -- Page not found
+
+  | PageNotFound
+
   -- Weekly report
 
   | WeeklyReport
@@ -151,9 +177,10 @@ data Key =
 
   -- Http error
 
+  | BadUrl
   | Timeout
   | NetworkError
-  | UnexpectedPayload
+  | BadPayload
 
   deriving (Enum, Bounded, Show)
 
-- 
cgit v1.2.3