diff options
author | Joris | 2016-01-03 19:41:31 +0100 |
---|---|---|
committer | Joris | 2016-01-03 19:41:31 +0100 |
commit | a8309988518af5bddf62d6a326d990fde4069b40 (patch) | |
tree | 6ff9c0af27d78f8579b5c3975378a3c82899593c /src/server/Design/LoggedIn/Add.hs | |
parent | 0cba27cba2b44756389d50bc113f23a2be87e978 (diff) | |
download | budget-a8309988518af5bddf62d6a326d990fde4069b40.tar.gz budget-a8309988518af5bddf62d6a326d990fde4069b40.tar.bz2 budget-a8309988518af5bddf62d6a326d990fde4069b40.zip |
Set focus properties to button elements
Diffstat (limited to 'src/server/Design/LoggedIn/Add.hs')
-rw-r--r-- | src/server/Design/LoggedIn/Add.hs | 13 |
1 files changed, 11 insertions, 2 deletions
diff --git a/src/server/Design/LoggedIn/Add.hs b/src/server/Design/LoggedIn/Add.hs index 3bdfb65..ef0603c 100644 --- a/src/server/Design/LoggedIn/Add.hs +++ b/src/server/Design/LoggedIn/Add.hs @@ -43,6 +43,9 @@ addDesign = borderRadius radius (px 0) (px 0) radius "width" -: "calc(100% - 40px)" "input:focus + label" ? backgroundColor C.grey + hover & do + input ? borderColor C.grey + label ? backgroundColor C.grey ".name" ? minWidth (px 150) @@ -51,18 +54,24 @@ addDesign = marginRight (pct blockPercentMargin) (".punctual" <> ".monthly") ? do - defaultButton C.lightGrey C.darkGrey (px $ inputHeight `Prelude.div` 2) + defaultButton C.lightGrey C.darkGrey (px $ inputHeight `Prelude.div` 2) focusLighten paddingLeft (px 15) paddingRight (px 15) ".selected" & do backgroundColor C.blue color C.white + hover & (".punctual" <> ".monthly") ? + ".selected" & backgroundColor (focusLighten C.blue) + + focus & (".punctual" <> ".monthly") ? + ".selected" & backgroundColor (focusLighten C.blue) + ".punctual" ? borderRadius radius radius 0 0 ".monthly" ? borderRadius 0 0 radius radius button # ".add" ? do - defaultButton C.red C.white (px inputHeight) + defaultButton C.red C.white (px inputHeight) focusLighten paddingLeft (px 15) paddingRight (px 15) i ? marginLeft (px 10) |