1 files changed, 5 insertions, 23 deletions
diff --git a/app/Main.hs b/app/Main.hs
index 7d3b5dc..e47ffc4 100644
--- a/app/Main.hs
+++ b/app/Main.hs
@@ -1,34 +1,16 @@
-{-# LANGUAGE DataKinds                  #-}
-{-# LANGUAGE DeriveAnyClass             #-}
-{-# LANGUAGE DeriveGeneric              #-}
-{-# LANGUAGE DerivingStrategies         #-}
-{-# LANGUAGE FlexibleInstances          #-}
-{-# LANGUAGE GeneralizedNewtypeDeriving #-}
-{-# LANGUAGE KindSignatures             #-}
-{-# LANGUAGE LambdaCase                 #-}
-{-# LANGUAGE RecordWildCards            #-}
-{-# LANGUAGE StandaloneDeriving         #-}
-{-# LANGUAGE StandaloneKindSignatures   #-}
-{-# LANGUAGE TypeApplications           #-}
-{-# LANGUAGE TypeFamilies               #-}
--- |
-
+-- | The main module. Does little more than handle some basic ocnfic, then
+-- call the server
 module Main where
 
 
-import qualified Data.Aeson                           as A
-import qualified Data.ByteString.Lazy                 as LB
+import           Control.Monad.IO.Class               (MonadIO (liftIO))
+import           Control.Monad.Logger                 (runStderrLoggingT)
 import           Data.Default.Class                   (def)
-import           Data.Maybe                           (fromJust, fromMaybe)
-import           Data.Time.Calendar.MonthDay          (monthAndDayToDayOfYearValid)
-import qualified Data.Time.Calendar.OrdinalDate       as Day
+import           Database.Persist.Postgresql
 import           Network.Wai.Handler.Warp             (run)
 import           Network.Wai.Middleware.RequestLogger (OutputFormat (..),
                                                        RequestLoggerSettings (..),
                                                        mkRequestLogger)
-import Database.Persist.Postgresql
-import Control.Monad.Logger (runStderrLoggingT)
-import           Control.Monad.IO.Class (MonadIO (liftIO))
 
 import           GTFS
 import           Server