aboutsummaryrefslogtreecommitdiff
path: root/src/server/Controller/Payer.hs
diff options
context:
space:
mode:
Diffstat (limited to 'src/server/Controller/Payer.hs')
-rw-r--r--src/server/Controller/Payer.hs20
1 files changed, 0 insertions, 20 deletions
diff --git a/src/server/Controller/Payer.hs b/src/server/Controller/Payer.hs
deleted file mode 100644
index 70760ae..0000000
--- a/src/server/Controller/Payer.hs
+++ /dev/null
@@ -1,20 +0,0 @@
-{-# LANGUAGE OverloadedStrings #-}
-
-module Controller.Payer
- ( getPayers
- ) where
-
-import Web.Scotty
-
-import Control.Monad.IO.Class (liftIO)
-
-import Model.Database
-import qualified Model.Payer as P
-
-import Secure (loggedAction)
-
-getPayers :: ActionM ()
-getPayers =
- Secure.loggedAction (\_ ->
- (liftIO $ runDb P.getPayers) >>= json
- )