From 892a7dd19a92fc18767984e624b8a5026dce61e4 Mon Sep 17 00:00:00 2001 From: Joris Guyonvarch Date: Tue, 11 Aug 2015 21:32:10 +0200 Subject: Showing server sides generated messages from the client --- src/server/Model/Message/Key.hs | 12 +++++++++++- 1 file changed, 11 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 59a5dbc..e1a382c 100644 --- a/src/server/Model/Message/Key.hs +++ b/src/server/Model/Message/Key.hs @@ -4,7 +4,17 @@ module Model.Message.Key data Key = - January + -- Sign in + + SharedCost + | SignIn + | SendEmailFail + | Unauthorized + | EnterValidEmail + + -- Dates + + | January | February | March | April -- cgit v1.2.3