8 files changed, 0 insertions, 12 deletions
diff --git a/src/Rahm/Desktop/Layout/ConsistentMosaic.hs b/src/Rahm/Desktop/Layout/ConsistentMosaic.hs
index 026a7dd..52406d6 100644
--- a/src/Rahm/Desktop/Layout/ConsistentMosaic.hs
+++ b/src/Rahm/Desktop/Layout/ConsistentMosaic.hs
@@ -4,10 +4,8 @@
 -- still work as expected.
 module Rahm.Desktop.Layout.ConsistentMosaic where
 
-import Data.Map ()
 import qualified Data.Map as Map (fromList, lookup)
 import Data.Maybe (mapMaybe)
-import Rahm.Desktop.Logger ()
 import qualified Rahm.Desktop.StackSet as W
   ( Screen (..),
     Stack (..),
diff --git a/src/Rahm/Desktop/Layout/Draw.hs b/src/Rahm/Desktop/Layout/Draw.hs
index 95a34eb..1e59156 100644
--- a/src/Rahm/Desktop/Layout/Draw.hs
+++ b/src/Rahm/Desktop/Layout/Draw.hs
@@ -6,8 +6,6 @@
 module Rahm.Desktop.Layout.Draw (drawLayout) where
 
 import Control.Arrow (second)
-import Control.Concurrent ()
-import Control.Exception ()
 import Control.Monad (foldM, forM_, unless)
 import Control.Monad.Writer (execWriter, tell)
 import Data.Foldable (find)
diff --git a/src/Rahm/Desktop/Layout/Flip.hs b/src/Rahm/Desktop/Layout/Flip.hs
index 8ebe9ac..b3162c9 100644
--- a/src/Rahm/Desktop/Layout/Flip.hs
+++ b/src/Rahm/Desktop/Layout/Flip.hs
@@ -11,7 +11,6 @@ module Rahm.Desktop.Layout.Flip
 where
 
 import Control.Arrow (second)
-import Data.Default ()
 import Data.List (intercalate)
 import XMonad
   ( Default (..),
diff --git a/src/Rahm/Desktop/Layout/Hole.hs b/src/Rahm/Desktop/Layout/Hole.hs
index 7f19e4c..1437c84 100644
--- a/src/Rahm/Desktop/Layout/Hole.hs
+++ b/src/Rahm/Desktop/Layout/Hole.hs
@@ -4,7 +4,6 @@
 -- Delegates to a lower layout, but leaves a hole where the next window will go.
 module Rahm.Desktop.Layout.Hole (hole, toggleHole) where
 
-import Data.Maybe ()
 import qualified Rahm.Desktop.StackSet as W
   ( Stack (Stack),
     Workspace (Workspace),
diff --git a/src/Rahm/Desktop/Layout/List.hs b/src/Rahm/Desktop/Layout/List.hs
index 48c2ab5..3d9214b 100644
--- a/src/Rahm/Desktop/Layout/List.hs
+++ b/src/Rahm/Desktop/Layout/List.hs
@@ -29,7 +29,6 @@ import Control.Arrow (second, (>>>))
 import Control.Monad.Identity (runIdentity)
 import Data.Maybe (fromJust, fromMaybe)
 import Data.Proxy (Proxy (..))
-import Data.Void ()
 import GHC.TypeLits (KnownNat, Nat, natVal, type (+))
 import qualified Rahm.Desktop.StackSet as W
   ( Workspace (Workspace),
diff --git a/src/Rahm/Desktop/Layout/Pop.hs b/src/Rahm/Desktop/Layout/Pop.hs
index ee277fb..0c7561a 100644
--- a/src/Rahm/Desktop/Layout/Pop.hs
+++ b/src/Rahm/Desktop/Layout/Pop.hs
@@ -14,8 +14,6 @@ module Rahm.Desktop.Layout.Pop
   )
 where
 
-import Data.Default ()
-import Rahm.Desktop.Layout.ReinterpretMessage ()
 import qualified Rahm.Desktop.StackSet as W
   ( Stack (focus),
     Workspace (Workspace),
@@ -28,7 +26,6 @@ import XMonad
     SomeMessage (SomeMessage),
     fromMessage,
   )
-import XMonad.Layout.LayoutModifier ()
 
 data Poppable (l :: * -> *) (a :: *) = Poppable
   { -- True if the current window is popped out or not.
diff --git a/src/Rahm/Desktop/Layout/Redescribe.hs b/src/Rahm/Desktop/Layout/Redescribe.hs
index 4a1a918..e65fd69 100644
--- a/src/Rahm/Desktop/Layout/Redescribe.hs
+++ b/src/Rahm/Desktop/Layout/Redescribe.hs
@@ -3,7 +3,6 @@
 -- to generate the new description.
 module Rahm.Desktop.Layout.Redescribe where
 
-import Data.Typeable ()
 import qualified Rahm.Desktop.StackSet as W
   ( Workspace (Workspace),
   )
diff --git a/src/Rahm/Desktop/Layout/Rotate.hs b/src/Rahm/Desktop/Layout/Rotate.hs
index 467ed96..c87bcab 100644
--- a/src/Rahm/Desktop/Layout/Rotate.hs
+++ b/src/Rahm/Desktop/Layout/Rotate.hs
@@ -11,7 +11,6 @@ module Rahm.Desktop.Layout.Rotate
 where
 
 import Control.Arrow (second)
-import Data.Default ()
 import XMonad
   ( Default (..),
     LayoutClass (description),