From 61ff1443c42def5a09f624e3df2e2520e97610d0 Mon Sep 17 00:00:00 2001
From: Joris
Date: Tue, 22 Oct 2019 23:25:05 +0200
Subject: Clone incomes

---
 server/src/Design/View/Payment/Table.hs | 5 -----
 server/src/Design/View/Table.hs         | 3 +++
 2 files changed, 3 insertions(+), 5 deletions(-)

(limited to 'server/src')

diff --git a/server/src/Design/View/Payment/Table.hs b/server/src/Design/View/Payment/Table.hs
index 26dc9ed..67828c9 100644
--- a/server/src/Design/View/Payment/Table.hs
+++ b/server/src/Design/View/Payment/Table.hs
@@ -4,7 +4,6 @@ module Design.View.Payment.Table
 
 import           Clay
 
-import qualified Design.Color as Color
 import qualified Design.Media as Media
 
 design :: Css
@@ -34,7 +33,3 @@ design = do
         ".shortDate" ? display none
         ".longDate" ? display inline
         marginBottom (em 0.5)
-
-    ".button" & svg ? do
-      "path" ? ("fill" -: Color.toString Color.chestnutRose)
-      width (px 18)
diff --git a/server/src/Design/View/Table.hs b/server/src/Design/View/Table.hs
index cd406fc..1c4e806 100644
--- a/server/src/Design/View/Table.hs
+++ b/server/src/Design/View/Table.hs
@@ -72,6 +72,9 @@ design = do
         textAlign (alignSide sideCenter)
         button ? do
           padding (px 10) (px 10) (px 10) (px 10)
+          svg ? do
+            "path" ? ("fill" -: Color.toString Color.chestnutRose)
+            width (px 18)
           hover & "svg path" ? do
             "fill" -: "rgb(237, 122, 116)"
 
-- 
cgit v1.2.3