aboutsummaryrefslogtreecommitdiff
path: root/src/server/Model/Database.hs
diff options
context:
space:
mode:
authorJoris2015-09-13 12:04:52 +0200
committerJoris2015-09-13 12:04:52 +0200
commit5babf01323bcb62a9880593165af70732f22751b (patch)
tree716373ce6f3ebeaa0bb532b30d2a3b65d894d128 /src/server/Model/Database.hs
parenta94813019b146d75f7556d10e8d0dfd50586f54d (diff)
downloadbudget-5babf01323bcb62a9880593165af70732f22751b.tar.gz
budget-5babf01323bcb62a9880593165af70732f22751b.tar.bz2
budget-5babf01323bcb62a9880593165af70732f22751b.zip
Adding income database table with a getter and a setter
Diffstat (limited to 'src/server/Model/Database.hs')
-rw-r--r--src/server/Model/Database.hs4
1 files changed, 4 insertions, 0 deletions
diff --git a/src/server/Model/Database.hs b/src/server/Model/Database.hs
index 0bbc353..c88322f 100644
--- a/src/server/Model/Database.hs
+++ b/src/server/Model/Database.hs
@@ -52,6 +52,10 @@ Job
lastExecution UTCTime Maybe
UniqJobName kind
deriving Show
+Income
+ userId UserId
+ creation UTCTime
+ amount Int
|]
type Persist a = SqlPersistT (ResourceT (NoLoggingT IO)) a