Add modal component

1 files changed, 43 insertions, 0 deletions

diff --git a/server/src/Design/Modal.hs b/server/src/Design/Modal.hs
new file mode 100644
index 0000000..2612257
--- /dev/null
+++ b/server/src/Design/Modal.hs
@@ -0,0 +1,43 @@
+module Design.Modal
+  ( design
+  ) where
+
+import           Data.Monoid ((<>))
+
+import           Clay
+
+design :: Css
+design = do
+
+  ".curtain" ? do
+    position fixed
+    cursor pointer
+    top (px 0)
+    left (px 0)
+    width (pct 100)
+    height (pct 100)
+    backgroundColor (rgba 0 0 0 0.5)
+    zIndex 1000
+    opacity 1
+    transition "all" (sec 0.2) ease (sec 0)
+
+  ".content" ? do
+    minWidth (px 270)
+    position fixed
+    top (pct 25)
+    left (pct 50)
+    "transform" -: "translate(-50%, -25%)"
+    zIndex 1000
+    backgroundColor white
+    sym padding (px 20)
+    sym borderRadius (px 5)
+    boxShadow (px 0) (px 0) (px 15) (rgba 0 0 0 0.5)
+
+  ".paymentModal" & do
+    ".radioGroup" ? ".title" ? display none
+    ".selectInput" ? do
+      select ? width (pct 100)
+      marginBottom (em 1)
+
+  ".deletePaymentModal" <> ".deleteIncomeModal" ? do
+    h1 ? marginBottom (em 1.5)