From 302a2e798f10e61c129753a2bd11634420c1f1a1 Mon Sep 17 00:00:00 2001 From: Joris Date: Sat, 2 Jan 2016 20:31:25 +0100 Subject: Set a spinner for sign in --- src/server/Model/Message/Key.hs | 10 +++++++--- 1 file changed, 7 insertions(+), 3 deletions(-) (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 1a1e944..34c9d71 100644 --- a/src/server/Model/Message/Key.hs +++ b/src/server/Model/Message/Key.hs @@ -4,16 +4,20 @@ module Model.Message.Key data Key = + -- Title + + SharedCost + -- Mail - NoReplyMail + | NoReplyMail -- Sign - | SharedCost | SignIn | InvalidEmail - | Unauthorized + | UnauthorizedSignIn + | ErrorSignIn -- Dates -- cgit v1.2.3