From fba73d65316f752cc440cb304df93a8998b1e529 Mon Sep 17 00:00:00 2001
From: vrom911 <vrom911@gmail.com>
Date: Sat, 12 Aug 2017 18:09:17 +0300
Subject: [PATCH] Fix auth page

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

diff --git a/src/Guide/Main.hs b/src/Guide/Main.hs
index eaea2ff..0371f3b 100644
--- a/src/Guide/Main.hs
+++ b/src/Guide/Main.hs
@@ -321,9 +321,9 @@ guideApp waiMetrics = do
         if isJust user
           then Spock.redirect "auth/logout"
           else Spock.redirect "auth/login"
-      Spock.getpost "login" $ authRedirect "/" loginAction
-      Spock.get "logout" logoutAction
-      Spock.getpost "register" $ authRedirect "/" signupAction
+      Spock.getpost (authRoute <//> "login") $ authRedirect "/" loginAction
+      Spock.get (authRoute <//> "logout") logoutAction
+      Spock.getpost (authRoute <//> "register") $ authRedirect "/" signupAction
 
 loginAction :: GuideAction ctx ()
 loginAction = do