aboutsummaryrefslogtreecommitdiff
path: root/server/src/Main.hs
diff options
context:
space:
mode:
authorJoris2018-10-28 17:57:58 +0100
committerJoris2018-10-28 17:57:58 +0100
commit40b4994797a797b1fa86cafda789a5c488730c6d (patch)
treead195b31fa442821b9de8f99364e254f0f41935f /server/src/Main.hs
parentdf83b634006c699cfa1e921bf74ce951a906a62f (diff)
downloadbudget-40b4994797a797b1fa86cafda789a5c488730c6d.tar.gz
budget-40b4994797a797b1fa86cafda789a5c488730c6d.tar.bz2
budget-40b4994797a797b1fa86cafda789a5c488730c6d.zip
Delete payment
Diffstat (limited to 'server/src/Main.hs')
-rw-r--r--server/src/Main.hs6
1 files changed, 3 insertions, 3 deletions
diff --git a/server/src/Main.hs b/server/src/Main.hs
index e298a06..745071c 100644
--- a/server/src/Main.hs
+++ b/server/src/Main.hs
@@ -37,7 +37,7 @@ main = do
S.put "/payment" $
S.jsonData >>= Payment.editOwn
- S.delete "/payment" $ do
+ S.delete "/payment/:id" $ do
paymentId <- S.param "id"
Payment.deleteOwn paymentId
@@ -47,7 +47,7 @@ main = do
S.put "/income" $
S.jsonData >>= Income.editOwn
- S.delete "/income" $ do
+ S.delete "/income/:id" $ do
incomeId <- S.param "id"
Income.deleteOwn incomeId
@@ -57,6 +57,6 @@ main = do
S.put "/category" $
S.jsonData >>= Category.edit
- S.delete "/category" $ do
+ S.delete "/category/:id" $ do
categoryId <- S.param "id"
Category.delete categoryId