From 85b07273a23e2c29926f7575da0d938345c58c3f Mon Sep 17 00:00:00 2001
From: Ben Sima <ben@bsima.me>
Date: Sat, 2 Nov 2019 18:29:27 -0700
Subject: format imports in ibb files

---
 Com/InfluencedByBooks/Aero.hs |  4 ++--
 Com/InfluencedByBooks/Apex.hs | 38 +++++++++++++++++++-------------------
 Com/InfluencedByBooks/Core.hs |  2 +-
 Com/InfluencedByBooks/Keep.hs | 19 +++++++++----------
 Com/InfluencedByBooks/Move.hs |  4 ++--
 5 files changed, 33 insertions(+), 34 deletions(-)

diff --git a/Com/InfluencedByBooks/Aero.hs b/Com/InfluencedByBooks/Aero.hs
index 92d071d..bd996c6 100644
--- a/Com/InfluencedByBooks/Aero.hs
+++ b/Com/InfluencedByBooks/Aero.hs
@@ -5,9 +5,9 @@
 -- | Front-end
 module Com.InfluencedByBooks.Aero where
 
-import Com.Simatime.Alpha
-import Com.InfluencedByBooks.Move (move)
 import Com.InfluencedByBooks.Core (Action(..), see, init)
+import Com.InfluencedByBooks.Move (move)
+import Com.Simatime.Alpha
 import Miso (App(..), defaultEvents, miso)
 
 main :: IO ()
diff --git a/Com/InfluencedByBooks/Apex.hs b/Com/InfluencedByBooks/Apex.hs
index 20b4e65..7bf597a 100644
--- a/Com/InfluencedByBooks/Apex.hs
+++ b/Com/InfluencedByBooks/Apex.hs
@@ -10,29 +10,29 @@
 -- | Server
 module Com.InfluencedByBooks.Apex where
 
-import Com.Simatime.Alpha
-import Com.InfluencedByBooks.Core
+import qualified Clay
+import           Com.InfluencedByBooks.Core
 import qualified Com.InfluencedByBooks.Keep as Keep
 import qualified Com.InfluencedByBooks.Look as Look
-import qualified Clay
-import qualified Data.Text.Lazy                as Lazy
-import qualified Data.Text.Lazy.Encoding       as Lazy
-import Data.Maybe (fromMaybe)
-import Data.Acid (AcidState)
+import           Com.Simatime.Alpha
+import           Com.Simatime.Network
+import           Data.Acid (AcidState)
 import qualified Data.Acid.Abstract as Acid
+import           Data.Maybe (fromMaybe)
+import qualified Data.Text.Lazy as Lazy
+import qualified Data.Text.Lazy.Encoding as Lazy
 import qualified Lucid as L
-import Lucid.Base
-import Miso
-import           Network.HTTP.Media             ((//), (/:))
-import Network.HTTP.Types
-import Com.Simatime.Network
-import Network.Wai
-import Network.Wai.Application.Static
-import Network.Wai.Handler.Warp
-import Network.Wai.Middleware.Gzip
-import Network.Wai.Middleware.RequestLogger
-import Servant
-import System.Environment (lookupEnv)
+import           Lucid.Base
+import           Miso
+import           Network.HTTP.Media ((//), (/:))
+import           Network.HTTP.Types
+import           Network.Wai
+import           Network.Wai.Application.Static
+import           Network.Wai.Handler.Warp
+import           Network.Wai.Middleware.Gzip
+import           Network.Wai.Middleware.RequestLogger
+import           Servant
+import           System.Environment (lookupEnv)
 
 main :: IO ()
 main = do
diff --git a/Com/InfluencedByBooks/Core.hs b/Com/InfluencedByBooks/Core.hs
index 9bd2353..1a8bf6f 100644
--- a/Com/InfluencedByBooks/Core.hs
+++ b/Com/InfluencedByBooks/Core.hs
@@ -8,13 +8,13 @@
 module Com.InfluencedByBooks.Core where
 
 import Com.Simatime.Alpha
+import Com.Simatime.Network
 import Data.Aeson hiding (Success)
 import Data.Data (Data, Typeable)
 import Data.Text (Text)
 import GHC.Generics (Generic)
 import Miso
 import Miso.String
-import Com.Simatime.Network
 import Servant.API
 import Servant.Links
 
diff --git a/Com/InfluencedByBooks/Keep.hs b/Com/InfluencedByBooks/Keep.hs
index 0bc527a..b84d4d8 100644
--- a/Com/InfluencedByBooks/Keep.hs
+++ b/Com/InfluencedByBooks/Keep.hs
@@ -12,20 +12,19 @@
 --
 module Com.InfluencedByBooks.Keep where
 
-import Com.InfluencedByBooks.Core (Person(..), Book(..))
-import Control.Monad.State (get, put)
-import Control.Monad.Reader (ask)
-import Data.Acid (Update, makeAcidic)
+import           Com.InfluencedByBooks.Core (Person(..), Book(..))
+import qualified Com.InfluencedByBooks.Influencers as Influencers
+import           Control.Monad.Reader (ask)
+import           Control.Monad.State (get, put)
+import           Data.Acid (Update, makeAcidic)
 import qualified Data.Acid as Acid
-import Data.Data (Data, Typeable)
-import Data.IxSet (Indexable(..), IxSet, ixFun, ixSet)
+import           Data.Data (Data, Typeable)
+import           Data.IxSet (Indexable(..), IxSet, ixFun, ixSet)
 import qualified Data.IxSet as IxSet
-import Data.SafeCopy
-import Data.Text (Text)
+import           Data.SafeCopy
+import           Data.Text (Text)
 import qualified Data.Text as Text
 
-import qualified Com.InfluencedByBooks.Influencers as Influencers
-
 -- * Keep
 
 -- | Main database. Need to think of a better name for this.
diff --git a/Com/InfluencedByBooks/Move.hs b/Com/InfluencedByBooks/Move.hs
index d372da6..3baafc6 100644
--- a/Com/InfluencedByBooks/Move.hs
+++ b/Com/InfluencedByBooks/Move.hs
@@ -8,13 +8,13 @@ module Com.InfluencedByBooks.Move (
   , fetchPeople
   ) where
 
+import Com.InfluencedByBooks.Core as Core
 import Com.Simatime.Alpha
+import Com.Simatime.Network
 import Data.Aeson
-import Com.InfluencedByBooks.Core as Core
 import JavaScript.Web.XMLHttpRequest (Request(..), Method(GET), RequestData(NoData), contents, xhrByteString)
 import Miso
 import Miso.String
-import Com.Simatime.Network
 
 move :: Action -> Model -> Effect Action Model
 move Nop m = noEff m
-- 
cgit v1.2.3