Adding UI income read-only

1 files changed, 6 insertions, 6 deletions

diff --git a/src/server/Controller/Index.hs b/src/server/Controller/Index.hs
index 17f5ae9..da67051 100644
--- a/src/server/Controller/Index.hs
+++ b/src/server/Controller/Index.hs
@@ -1,6 +1,6 @@
 module Controller.Index
-  ( getIndexAction
-  , signOutAction
+  ( getIndex
+  , signOut
   ) where
 
 import Web.Scotty
@@ -11,10 +11,10 @@ import qualified LoginSession
 
 import View.Page (page)
 
-getIndexAction :: ActionM ()
-getIndexAction = html page
+getIndex :: ActionM ()
+getIndex = html page
 
-signOutAction :: ActionM ()
-signOutAction = do
+signOut :: ActionM ()
+signOut = do
   LoginSession.delete
   status ok200