From 602c52acfcfa494b07fec05c20b317b60ea8a6f3 Mon Sep 17 00:00:00 2001
From: Joris
Date: Sun, 20 Oct 2019 21:31:57 +0200
Subject: Load init data per page with AJAX

---
 server/src/Persistence/Init.hs | 25 -------------------------
 1 file changed, 25 deletions(-)
 delete mode 100644 server/src/Persistence/Init.hs

(limited to 'server/src/Persistence/Init.hs')

diff --git a/server/src/Persistence/Init.hs b/server/src/Persistence/Init.hs
deleted file mode 100644
index 74d9172..0000000
--- a/server/src/Persistence/Init.hs
+++ /dev/null
@@ -1,25 +0,0 @@
-module Persistence.Init
-  ( getInit
-  ) where
-
-import           Common.Model                (Init (Init), User (..))
-
-import           Conf                        (Conf)
-import qualified Conf
-import           Model.Query                 (Query)
-import qualified Persistence.Category        as CategoryPersistence
-import qualified Persistence.Income          as IncomePersistence
-import qualified Persistence.Payment         as PaymentPersistence
-import qualified Persistence.PaymentCategory as PaymentCategoryPersistence
-import qualified Persistence.User            as UserPersistence
-
-getInit :: User -> Conf -> Query Init
-getInit user conf =
-  Init <$>
-    UserPersistence.list <*>
-    (return . _user_id $ user) <*>
-    PaymentPersistence.listActive <*>
-    IncomePersistence.list <*>
-    CategoryPersistence.list <*>
-    PaymentCategoryPersistence.list <*>
-    (return . Conf.currency $ conf)
-- 
cgit v1.2.3