From 2a53fe50c62d4b7aec0f422998c743f68aa523c1 Mon Sep 17 00:00:00 2001
From: Joris Guyonvarch
Date: Tue, 21 Jul 2015 23:25:58 +0200
Subject: Adding the payment without reloading the page

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

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

diff --git a/src/server/Main.hs b/src/server/Main.hs
index d534c4e..2ae319b 100644
--- a/src/server/Main.hs
+++ b/src/server/Main.hs
@@ -29,6 +29,9 @@ main = do
       token <- param "token" :: ActionM Text
       validateSignInAction token
 
+    get "/userName" $
+      getUserName
+
     get "/payments" $
       getPaymentsAction
 
-- 
cgit v1.2.3