From 6dfc1c166db387a60630eff980e330518601df5b Mon Sep 17 00:00:00 2001
From: Joris
Date: Sun, 13 Oct 2019 20:58:45 +0200
Subject: Fix sign in responsiveness

---
 ISSUES.md                        | 3 +--
 server/src/Design/Global.hs      | 6 +++---
 server/src/Design/View/SignIn.hs | 4 +++-
 3 files changed, 7 insertions(+), 6 deletions(-)

diff --git a/ISSUES.md b/ISSUES.md
index b7d31c3..92e9052 100644
--- a/ISSUES.md
+++ b/ISSUES.md
@@ -12,10 +12,9 @@
 - Edit a category
 - Remove a category
 
-## Phone
+## Mobile
 
 - Slow, consider native ?
-- Fix sign-in responsiveness
 
 # Additional features
 
diff --git a/server/src/Design/Global.hs b/server/src/Design/Global.hs
index 24d999f..5b8f2dc 100644
--- a/server/src/Design/Global.hs
+++ b/server/src/Design/Global.hs
@@ -111,14 +111,14 @@ global = do
       display flex
 
     svg # ".loader" ? do
-      opacity 0
+      display none
       position absolute
 
     ".waiting" & do
       ".content" ? do
-        opacity 0
+        display none
       svg # ".loader" ? do
-        opacity 1
+        display block
         spinAnimation
 
   select ? cursor pointer
diff --git a/server/src/Design/View/SignIn.hs b/server/src/Design/View/SignIn.hs
index 2138676..a39276e 100644
--- a/server/src/Design/View/SignIn.hs
+++ b/server/src/Design/View/SignIn.hs
@@ -4,6 +4,7 @@ module Design.View.SignIn
 
 import           Clay
 import           Data.Monoid      ((<>))
+import           Prelude          hiding (rem)
 
 import qualified Design.Color     as Color
 import qualified Design.Constants as Constants
@@ -12,7 +13,8 @@ import qualified Design.Helper    as Helper
 design :: Css
 design = do
   let inputHeight = 50
-  width (px 500)
+  maxWidth (px 550)
+  sym2 padding (rem 0) (rem 2)
   marginTop (px 100)
   marginLeft auto
   marginRight auto
-- 
cgit v1.2.3