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/Job/Model.hs | 18 +++++++++---------
 1 file changed, 9 insertions(+), 9 deletions(-)

(limited to 'server/src/Job/Model.hs')

diff --git a/server/src/Job/Model.hs b/server/src/Job/Model.hs
index e1a3c77..b90dca0 100644
--- a/server/src/Job/Model.hs
+++ b/server/src/Job/Model.hs
@@ -7,20 +7,20 @@ module Job.Model
   , actualizeLastCheck
   ) where
 
-import Data.Maybe (isJust)
-import Data.Time.Clock (UTCTime, getCurrentTime)
-import Database.SQLite.Simple (Only(Only))
+import           Data.Maybe             (isJust)
+import           Data.Time.Clock        (UTCTime, getCurrentTime)
+import           Database.SQLite.Simple (Only (Only))
 import qualified Database.SQLite.Simple as SQLite
-import Prelude hiding (id)
+import           Prelude                hiding (id)
 
-import Job.Kind
-import Model.Query (Query(Query))
+import           Job.Kind
+import           Model.Query            (Query (Query))
 
 data Job = Job
-  { id :: String
-  , kind :: Kind
+  { id            :: String
+  , kind          :: Kind
   , lastExecution :: Maybe UTCTime
-  , lastCheck :: Maybe UTCTime
+  , lastCheck     :: Maybe UTCTime
   } deriving (Show)
 
 getLastExecution :: Kind -> Query (Maybe UTCTime)
-- 
cgit v1.2.3