From fb8f0fe577e28dae69903413b761da50586e0099 Mon Sep 17 00:00:00 2001
From: Joris
Date: Sat, 10 Aug 2019 14:53:41 +0200
Subject: Remove payment category if unused after a payment is deleted

---
 server/src/Main.hs | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

(limited to 'server/src/Main.hs')

diff --git a/server/src/Main.hs b/server/src/Main.hs
index 745071c..0ccf5e2 100644
--- a/server/src/Main.hs
+++ b/server/src/Main.hs
@@ -35,21 +35,21 @@ main = do
       S.jsonData >>= Payment.create
 
     S.put "/payment" $
-      S.jsonData >>= Payment.editOwn
+      S.jsonData >>= Payment.edit
 
     S.delete "/payment/:id" $ do
       paymentId <- S.param "id"
-      Payment.deleteOwn paymentId
+      Payment.delete paymentId
 
     S.post "/income" $
       S.jsonData >>= Income.create
 
     S.put "/income" $
-      S.jsonData >>= Income.editOwn
+      S.jsonData >>= Income.edit
 
     S.delete "/income/:id" $ do
       incomeId <- S.param "id"
-      Income.deleteOwn incomeId
+      Income.delete incomeId
 
     S.post "/category" $
       S.jsonData >>= Category.create
-- 
cgit v1.2.3