From 8816cf758119a6a2073e561c8df297a833630986 Mon Sep 17 00:00:00 2001 From: Joris Date: Mon, 8 Aug 2016 20:58:17 +0200 Subject: Show incomes in a table and update like payments are updated --- src/server/Design/LoggedIn.hs | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 'src/server/Design/LoggedIn.hs') diff --git a/src/server/Design/LoggedIn.hs b/src/server/Design/LoggedIn.hs index 5a3297a..2899fa4 100644 --- a/src/server/Design/LoggedIn.hs +++ b/src/server/Design/LoggedIn.hs @@ -4,19 +4,19 @@ module Design.LoggedIn ( design ) where -import Data.Monoid ((<>)) - import Clay import qualified Design.LoggedIn.Home as Home import qualified Design.LoggedIn.Income as Income import qualified Design.LoggedIn.Stat as Stat +import qualified Design.LoggedIn.Table as Table design :: Css design = do ".home" ? Home.design ".income" ? Income.design ".stat" ? Stat.design + Table.design - (".income" <> ".stat") ? do + ".textual" ? do "margin" -: "0 2vw" -- cgit v1.2.3