aboutsummaryrefslogtreecommitdiff
path: root/src/server/Controller
diff options
context:
space:
mode:
Diffstat (limited to 'src/server/Controller')
-rw-r--r--src/server/Controller/Payment.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/server/Controller/Payment.hs b/src/server/Controller/Payment.hs
index 25d3261..7cbfb37 100644
--- a/src/server/Controller/Payment.hs
+++ b/src/server/Controller/Payment.hs
@@ -37,7 +37,7 @@ getPaymentsAction page perPage =
getMonthlyPaymentsAction :: ActionM ()
getMonthlyPaymentsAction =
Secure.loggedAction (\user -> do
- (liftIO $ runDb (getMonthlyPayments (entityKey user))) >>= json
+ (liftIO $ runDb (getUserMonthlyPayments (entityKey user))) >>= json
)
createPaymentAction :: Text -> Int -> Frequency -> ActionM ()