From 9d57e149fcb124a28813c56f83cf254eb92baa42 Mon Sep 17 00:00:00 2001 From: Joris Date: Fri, 11 Mar 2016 23:21:06 +0100 Subject: Don't use persona anymore, use email token to sign in --- src/server/Design/SignIn.hs | 34 ++++++++++++++++++++++++---------- 1 file changed, 24 insertions(+), 10 deletions(-) (limited to 'src/server/Design') diff --git a/src/server/Design/SignIn.hs b/src/server/Design/SignIn.hs index a565ee4..d2487f1 100644 --- a/src/server/Design/SignIn.hs +++ b/src/server/Design/SignIn.hs @@ -15,14 +15,28 @@ signInDesign = ".signIn" ? do - button ? do - display block - margin (em 5) auto (em 2) auto - iconButton C.blue C.white (em 2.5) focusLighten - fontSize (em 1.5) - position relative - ".waitingServer" & ("cursor" -: "not-allowed") - - ".error" ? do + form ? do + let inputHeight = 50 + width (px 500) + marginTop (px 100) + marginLeft auto + marginRight auto + + input ? do + defaultInput inputHeight + display block + width (pct 100) + marginBottom (px 10) + + button ? do + iconButton C.blue C.white (px inputHeight) focusLighten + display block + width (pct 100) + fontSize (em 1.2) + ".waitingServer" & ("cursor" -: "not-allowed") + + ".result" ? do + marginTop (px 40) textAlign (alignSide sideCenter) - color C.redError + ".success" ? color C.green + ".error" ? color C.redError -- cgit v1.2.3