From 0e85e2815f5bb0ab8b5fb8156bd772b4a7743f13 Mon Sep 17 00:00:00 2001 From: Joris Date: Tue, 8 Sep 2015 09:41:07 +0200 Subject: Using dom buttons for payment delete --- src/server/Design/Global.hs | 17 +++++++++++------ 1 file changed, 11 insertions(+), 6 deletions(-) (limited to 'src/server/Design') diff --git a/src/server/Design/Global.hs b/src/server/Design/Global.hs index 13b2d6a..53a73eb 100644 --- a/src/server/Design/Global.hs +++ b/src/server/Design/Global.hs @@ -168,18 +168,20 @@ global = do "border-spacing" -: "10 px" ".header" <> ".row" ? display tableRow + let headerHeight = (px 70) + let rowHeight = (px 60) ".header" ? do fontWeight bold backgroundColor C.red color C.white fontSize iconFontSize - lineHeight (px 70) + lineHeight headerHeight ".row" ? do fontSize (px 20) cursor pointer - lineHeight (px 60) + lineHeight rowHeight nthChild "odd" & backgroundColor C.lightGrey ".edition" & do backgroundColor C.paymentFocus @@ -188,7 +190,7 @@ global = do ".cell" ? do display tableCell ".category" & width (pct 40) - ".cost" & width (pct 20) + ".cost" & width (pct 17) ".user" & width (pct 20) ".date" & do width (pct 20) @@ -199,12 +201,15 @@ global = do ".shortDate" ? display none ".longDate" ? display inline ".delete" & do - width (px 10) - height (px 10) + width (pct 3) + height rowHeight textAlign (alignSide sideCenter) backgroundColor C.red - color C.white visibility hidden + button ? do + width (pct 100) + height (pct 100) + color C.white ".pages" ? do padding (px 30) (px 30) (px 30) (px 30) -- cgit v1.2.3