From cc58377a48d13ef85cedb5ec0e19eb8b879dd497 Mon Sep 17 00:00:00 2001
From: Joris
Date: Mon, 28 Mar 2016 18:04:25 +0200
Subject: Compute payment count client side

---
 src/server/Model/Json/Payer.hs | 22 ----------------------
 1 file changed, 22 deletions(-)
 delete mode 100644 src/server/Model/Json/Payer.hs

(limited to 'src/server/Model/Json')

diff --git a/src/server/Model/Json/Payer.hs b/src/server/Model/Json/Payer.hs
deleted file mode 100644
index 2101e40..0000000
--- a/src/server/Model/Json/Payer.hs
+++ /dev/null
@@ -1,22 +0,0 @@
-{-# LANGUAGE DeriveGeneric #-}
-
-module Model.Json.Payer
-  ( Payer(..)
-  ) where
-
-import GHC.Generics
-
-import Data.Aeson
-
-import Model.Database (UserId)
-import Model.Json.Income
-
-data Payer = Payer
-  { userId :: UserId
-  , preIncomePaymentSum :: Int
-  , postIncomePaymentSum :: Int
-  , incomes :: [Income]
-  } deriving (Show, Generic)
-
-instance FromJSON Payer
-instance ToJSON Payer
-- 
cgit v1.2.3