Add the edit functionnality on payments

2 files changed, 5 insertions, 3 deletions

diff --git a/src/server/Design/Form.hs b/src/server/Design/Form.hs
index 612759b..caee8ff 100644
--- a/src/server/Design/Form.hs
+++ b/src/server/Design/Form.hs
@@ -51,6 +51,8 @@ design = do
       right (px 0)
       top (px 27)
       zIndex inputZIndex
+      hover & "svg path" ? do
+        "fill" -: "rgb(220, 220, 220)"
 
     (input # ".filled" |+ label) <> (input # focus |+ label) ? do
       top (px 0)
diff --git a/src/server/Design/LoggedIn/Home/Table.hs b/src/server/Design/LoggedIn/Home/Table.hs
index 23b924f..3f55207 100644
--- a/src/server/Design/LoggedIn/Home/Table.hs
+++ b/src/server/Design/LoggedIn/Home/Table.hs
@@ -45,9 +45,9 @@ design = do
       display tableCell
       position relative
       verticalAlign middle
-      ".category" & width (pct 37)
+      ".category" & width (pct 36)
       ".cost" & do
-        width (pct 17)
+        width (pct 15)
         ".refund" & color Color.mossGreen
       ".user" & width (pct 20)
       ".date" & do
@@ -63,4 +63,4 @@ design = do
         width (pct 3)
         textAlign (alignSide sideCenter)
         button # hover ? "svg path" ? do
-          "fill" -: "rgb(227, 112, 106)"
+          "fill" -: "rgb(237, 122, 116)"