From c0922e49064b1789e3415fbef91ba680ed887882 Mon Sep 17 00:00:00 2001
From: Griffin Smith <grfn@gws.fyi>
Date: Mon, 29 Jun 2020 10:32:59 -0400
Subject: fix(xan): Remove unused imports

GHC 8.8 is better at detecting unused imports, it seems - all of these
are new warnings that fail under -Werror

Change-Id: I1357094d715483612deb0db4a75b3e4f8f27d2e3
Reviewed-on: https://cl.tvl.fyi/c/depot/+/889
Reviewed-by: glittershark <grfn@gws.fyi>
Reviewed-by: BuildkiteCI
Tested-by: BuildkiteCI
---
 users/glittershark/xanthous/src/Xanthous/App/Autocommands.hs |  1 -
 users/glittershark/xanthous/src/Xanthous/App/Prompt.hs       |  2 +-
 users/glittershark/xanthous/src/Xanthous/Game/Draw.hs        | 10 +---------
 users/glittershark/xanthous/src/Xanthous/Generators.hs       |  1 -
 4 files changed, 2 insertions(+), 12 deletions(-)

diff --git a/users/glittershark/xanthous/src/Xanthous/App/Autocommands.hs b/users/glittershark/xanthous/src/Xanthous/App/Autocommands.hs
index 35b92bba7289..f393a0e2ea9a 100644
--- a/users/glittershark/xanthous/src/Xanthous/App/Autocommands.hs
+++ b/users/glittershark/xanthous/src/Xanthous/App/Autocommands.hs
@@ -21,7 +21,6 @@ import           Xanthous.Entities.Character (speed)
 import           Xanthous.Entities.Creature (Creature, creatureType)
 import           Xanthous.Entities.RawTypes (hostile)
 import           Xanthous.Game.State
-import           Xanthous.Game.Lenses (characterVisibleEntities)
 --------------------------------------------------------------------------------
 
 autoStep :: Autocommand -> AppM ()
diff --git a/users/glittershark/xanthous/src/Xanthous/App/Prompt.hs b/users/glittershark/xanthous/src/Xanthous/App/Prompt.hs
index 6704a601da90..9b5a3bf24fa7 100644
--- a/users/glittershark/xanthous/src/Xanthous/App/Prompt.hs
+++ b/users/glittershark/xanthous/src/Xanthous/App/Prompt.hs
@@ -17,7 +17,7 @@ import           Brick (BrickEvent(..), Next)
 import           Brick.Widgets.Edit (handleEditorEvent)
 import           Data.Aeson (ToJSON, object)
 import           Graphics.Vty.Input.Events (Event(EvKey), Key(..))
-import           GHC.TypeLits (TypeError, ErrorMessage(..))
+import           GHC.TypeLits (ErrorMessage(..))
 --------------------------------------------------------------------------------
 import           Xanthous.App.Common
 import           Xanthous.Data (move)
diff --git a/users/glittershark/xanthous/src/Xanthous/Game/Draw.hs b/users/glittershark/xanthous/src/Xanthous/Game/Draw.hs
index b9bd8fdc039e..0e1fedc67d19 100644
--- a/users/glittershark/xanthous/src/Xanthous/Game/Draw.hs
+++ b/users/glittershark/xanthous/src/Xanthous/Game/Draw.hs
@@ -18,17 +18,9 @@ import           Xanthous.Game.State
 import           Xanthous.Entities.Character
 import           Xanthous.Entities.Item (Item)
 import           Xanthous.Game
-                 ( GameState(..)
-                 , entities
-                 , revealedPositions
-                 , characterPosition
+                 ( characterPosition
                  , characterVisiblePositions
                  , character
-                 , MessageHistory(..)
-                 , messageHistory
-                 , GamePromptState(..)
-                 , promptState
-                 , debugState, allRevealed
                  )
 import           Xanthous.Game.Prompt
 import           Xanthous.Orphans ()
diff --git a/users/glittershark/xanthous/src/Xanthous/Generators.hs b/users/glittershark/xanthous/src/Xanthous/Generators.hs
index 5bc8bcf03582..2801137b699c 100644
--- a/users/glittershark/xanthous/src/Xanthous/Generators.hs
+++ b/users/glittershark/xanthous/src/Xanthous/Generators.hs
@@ -24,7 +24,6 @@ module Xanthous.Generators
 --------------------------------------------------------------------------------
 import           Xanthous.Prelude
 import           Data.Array.Unboxed
-import           System.Random (RandomGen)
 import qualified Options.Applicative as Opt
 import           Control.Monad.Random
 --------------------------------------------------------------------------------
-- 
cgit 1.4.1