diff options
Diffstat (limited to 'src/server/Main.hs')
| -rw-r--r-- | src/server/Main.hs | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/src/server/Main.hs b/src/server/Main.hs index f73f2e0..8d5a625 100644 --- a/src/server/Main.hs +++ b/src/server/Main.hs @@ -31,12 +31,12 @@ main = do cost <- param "cost" :: ActionM Int insertPaymentAction email name cost - get "/signIn" $ do + post "/signIn" $ do login <- param "login" :: ActionM Text signIn login - get "/checkConnection" $ + post "/checkConnection" $ checkConnection - get "/signOut" $ + post "/signOut" $ signOut |