aboutsummaryrefslogtreecommitdiff
path: root/src/server/Main.hs
diff options
context:
space:
mode:
Diffstat (limited to 'src/server/Main.hs')
-rw-r--r--src/server/Main.hs4
1 files changed, 4 insertions, 0 deletions
diff --git a/src/server/Main.hs b/src/server/Main.hs
index c3d285e..1c2bc08 100644
--- a/src/server/Main.hs
+++ b/src/server/Main.hs
@@ -4,6 +4,9 @@ import Web.Scotty
import Network.Wai.Middleware.Static
+import Control.Concurrent (forkIO)
+import MonthlyPaymentJob (monthlyPaymentJobListener)
+
import Data.Text (Text)
import qualified Data.Text.IO as TIO
@@ -19,6 +22,7 @@ import Config
main :: IO ()
main = do
+ _ <- forkIO monthlyPaymentJobListener
eitherConfig <- getConfig "config.txt"
case eitherConfig of
Left errorMessage ->