From 53afb9c96904ab226ccee754419569da16c59871 Mon Sep 17 00:00:00 2001 From: Joris Date: Sun, 6 Sep 2015 23:25:44 +0200 Subject: Setting up the monthly job --- src/server/Model/JobKind.hs | 13 +++++++++++++ 1 file changed, 13 insertions(+) create mode 100644 src/server/Model/JobKind.hs (limited to 'src/server/Model/JobKind.hs') diff --git a/src/server/Model/JobKind.hs b/src/server/Model/JobKind.hs new file mode 100644 index 0000000..bbe1d45 --- /dev/null +++ b/src/server/Model/JobKind.hs @@ -0,0 +1,13 @@ +{-# LANGUAGE TemplateHaskell #-} + +module Model.JobKind + ( JobKind(..) + ) where + +import Database.Persist.TH + +data JobKind = + MonthlyPaymentJob + deriving (Eq, Show, Read) + +derivePersistField "JobKind" -- cgit v1.2.3