Change to use minimal imports.

This is achieved by using `stack build --ghc-options=-ddump-minimal-imports`
and looking for the *.imports files.

1 files changed, 16 insertions, 3 deletions

diff --git a/src/Rahm/Desktop/Desktop.hs b/src/Rahm/Desktop/Desktop.hs
index 5466fd1..04895c7 100644
--- a/src/Rahm/Desktop/Desktop.hs
+++ b/src/Rahm/Desktop/Desktop.hs
@@ -6,14 +6,27 @@ module Rahm.Desktop.Desktop where
 -- import XMonad.Operations
 
 import Control.Monad (forM_)
-import Data.Default
+import Data.Default (Default (..))
 import Data.Map (Map)
-import qualified Data.Map as Map
+import qualified Data.Map as Map (fromList, insert, lookup)
 import Data.Maybe (fromMaybe)
 import XMonad (X (..))
 import qualified XMonad as X
+  ( ExtensionClass (..),
+    ScreenId,
+    StateExtension (PersistentExtension),
+    WorkspaceId,
+    windows,
+    withWindowSet,
+  )
 import qualified XMonad.StackSet as W
-import qualified XMonad.Util.ExtensibleState as XS
+  ( Screen (Screen, screen, workspace),
+    StackSet (StackSet),
+    Workspace (tag),
+    screens,
+    workspaces,
+  )
+import qualified XMonad.Util.ExtensibleState as XS (get, modify)
 
 newtype Desktop si wi = Desktop (Map si wi)
   deriving (Read, Show)