aboutsummaryrefslogtreecommitdiff
path: root/src/server/Model/Json
diff options
context:
space:
mode:
authorJoris2016-03-28 18:04:25 +0200
committerJoris2016-03-28 18:04:25 +0200
commitcc58377a48d13ef85cedb5ec0e19eb8b879dd497 (patch)
tree8a400e8e208f9ca7a94a3dad054bdad2b4a04b0f /src/server/Model/Json
parent166cd04e4b28770ede854dafc9ae30eae64102fe (diff)
Compute payment count client side
Diffstat (limited to 'src/server/Model/Json')
-rw-r--r--src/server/Model/Json/Payer.hs22
1 files changed, 0 insertions, 22 deletions
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