aboutsummaryrefslogtreecommitdiff
path: root/src/server/Design
diff options
context:
space:
mode:
Diffstat (limited to 'src/server/Design')
-rw-r--r--src/server/Design/Form.hs9
-rw-r--r--src/server/Design/LoggedIn/Home/Table.hs14
-rw-r--r--src/server/Design/LoggedIn/Income.hs2
3 files changed, 9 insertions, 16 deletions
diff --git a/src/server/Design/Form.hs b/src/server/Design/Form.hs
index c2537f1..00de12d 100644
--- a/src/server/Design/Form.hs
+++ b/src/server/Design/Form.hs
@@ -16,6 +16,7 @@ design = do
let inputHeight = 30
let inputTop = 22
let inputPaddingBottom = 3
+ let inputZIndex = 1
".textInput" ? do
position relative
@@ -25,7 +26,7 @@ design = do
input ? do
position relative
- zIndex 1
+ zIndex inputZIndex
backgroundColor transparent
paddingBottom (px inputPaddingBottom)
borderStyle none
@@ -45,6 +46,12 @@ design = do
color Color.silver
transition "all" (sec 0.2) easeIn (sec 0)
+ button ? do
+ position absolute
+ right (px 0)
+ top (px 27)
+ zIndex inputZIndex
+
(input # ".filled" |+ label) <> (input # focus |+ label) ? do
top (px 0)
fontSize (pct 80)
diff --git a/src/server/Design/LoggedIn/Home/Table.hs b/src/server/Design/LoggedIn/Home/Table.hs
index a229132..2594f25 100644
--- a/src/server/Design/LoggedIn/Home/Table.hs
+++ b/src/server/Design/LoggedIn/Home/Table.hs
@@ -38,20 +38,6 @@ design = do
".row" ? do
fontSize (px 18)
height (px rowHeightPx)
- ".cell:first-child::before" ? do
- display block
- content (stringContent "")
- position absolute
- top (px 0)
- left (px 0)
- width (px 0)
- height (px rowHeightPx)
- backgroundColor Color.mossGreen
- transition "width" (sec 0.3) ease (sec 0)
- opacity (0.8)
-
- hover & do
- ".cell:first-child::before" ? width (px 5)
nthChild "odd" & do
backgroundColor Color.wildSand
diff --git a/src/server/Design/LoggedIn/Income.hs b/src/server/Design/LoggedIn/Income.hs
index bebd136..84ae521 100644
--- a/src/server/Design/LoggedIn/Income.hs
+++ b/src/server/Design/LoggedIn/Income.hs
@@ -21,7 +21,7 @@ design = do
"margin-bottom" -: "4vh"
".textInput" ? marginRight (px 30)
- button ? do
+ button # ".add" ? do
Helper.defaultButton Color.chestnutRose Color.white (px Constants.inputHeight) Constants.focusLighten
marginTop (px 3)