From 5a63f7be9375e3ab888e4232dd7ef72c2f1ffae1 Mon Sep 17 00:00:00 2001
From: Joris
Date: Mon, 13 Nov 2017 23:56:40 +0100
Subject: Setup stylish-haskell

---
 server/src/Secure.hs | 24 ++++++++++++------------
 1 file changed, 12 insertions(+), 12 deletions(-)

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

diff --git a/server/src/Secure.hs b/server/src/Secure.hs
index f427304..88bdcda 100644
--- a/server/src/Secure.hs
+++ b/server/src/Secure.hs
@@ -5,21 +5,21 @@ module Secure
   , getUserFromToken
   ) where
 
-import Control.Monad.IO.Class (liftIO)
-import Data.Text (Text)
-import Data.Text.Lazy (fromStrict)
-import Network.HTTP.Types.Status (forbidden403)
-import Web.Scotty
+import           Control.Monad.IO.Class    (liftIO)
+import           Data.Text                 (Text)
+import           Data.Text.Lazy            (fromStrict)
+import           Network.HTTP.Types.Status (forbidden403)
+import           Web.Scotty
 
-import qualified Common.Message as Message
-import qualified Common.Message.Key as Key
-import Common.Model (User)
+import qualified Common.Message            as Message
+import qualified Common.Message.Key        as Key
+import           Common.Model              (User)
 
-import Model.Query (Query)
 import qualified LoginSession
-import qualified Model.Query as Query
-import qualified Model.SignIn as SignIn
-import qualified Model.User as User
+import           Model.Query               (Query)
+import qualified Model.Query               as Query
+import qualified Model.SignIn              as SignIn
+import qualified Model.User                as User
 
 loggedAction :: (User -> ActionM ()) -> ActionM ()
 loggedAction action = do
-- 
cgit v1.2.3