More import pruning

darcs-hash:20071208014846-a5988-6c53b449256d73dc5ab3e1bac2f9f0a93227b078.gz

18 files changed, 7 insertions, 24 deletions

diff --git a/XMonad/Actions/Commands.hs b/XMonad/Actions/Commands.hs
index 6826c3e..6892957 100644
--- a/XMonad/Actions/Commands.hs
+++ b/XMonad/Actions/Commands.hs
@@ -28,7 +28,6 @@ module XMonad.Actions.Commands (
 import XMonad
 import XMonad.StackSet hiding (workspaces)
 import XMonad.Util.Dmenu (dmenu)
-import XMonad.Layouts
 
 import qualified Data.Map as M
 import System.Exit
diff --git a/XMonad/Config/Arossato.hs b/XMonad/Config/Arossato.hs
index 114404c..338b5a7 100644
--- a/XMonad/Config/Arossato.hs
+++ b/XMonad/Config/Arossato.hs
@@ -23,7 +23,6 @@ module XMonad.Config.Arossato
 import qualified Data.Map as M
 
 import XMonad
-import XMonad.Layouts
 import XMonad.ManageHook
 import qualified XMonad.StackSet as W
 
diff --git a/XMonad/Config/Droundy.hs b/XMonad/Config/Droundy.hs
index 16d2798..e37a9a5 100644
--- a/XMonad/Config/Droundy.hs
+++ b/XMonad/Config/Droundy.hs
@@ -10,12 +10,11 @@ module XMonad.Config.Droundy ( config, mytab ) where
 
 --import Control.Monad.State ( modify )
 
-import XMonad hiding (keys, config)
+import XMonad hiding (keys, config, (|||))
 import qualified XMonad (keys)
 import XMonad.Config ( defaultConfig )
 
 --import XMonad.Core ( windowset )
-import XMonad.Layouts hiding ( (|||) )
 import qualified XMonad.StackSet as W
 import qualified Data.Map as M
 import System.Exit
diff --git a/XMonad/Config/Sjanssen.hs b/XMonad/Config/Sjanssen.hs
index 5e10273..09e0b16 100644
--- a/XMonad/Config/Sjanssen.hs
+++ b/XMonad/Config/Sjanssen.hs
@@ -1,10 +1,9 @@
 {-# OPTIONS_GHC -fno-warn-missing-signatures #-}
 module XMonad.Config.Sjanssen (sjanssenConfig) where
 
-import XMonad
+import XMonad hiding (Tall(..))
 import qualified XMonad.StackSet as W
 import XMonad.Actions.CopyWindow
-import XMonad.Layouts hiding (Tall)
 import XMonad.Layout.Tabbed
 import XMonad.Layout.HintedTile
 import XMonad.Config (defaultConfig)
diff --git a/XMonad/Hooks/DynamicLog.hs b/XMonad/Hooks/DynamicLog.hs
index 4f9f3b3..5646d59 100644
--- a/XMonad/Hooks/DynamicLog.hs
+++ b/XMonad/Hooks/DynamicLog.hs
@@ -41,7 +41,6 @@ module XMonad.Hooks.DynamicLog (
 -- Useful imports
 --
 import XMonad
-import XMonad.Layouts
 import Data.Maybe ( isJust )
 import Data.List
 import Data.Ord ( comparing )
diff --git a/XMonad/Layout/Accordion.hs b/XMonad/Layout/Accordion.hs
index 2177de9..2eda320 100644
--- a/XMonad/Layout/Accordion.hs
+++ b/XMonad/Layout/Accordion.hs
@@ -20,7 +20,6 @@ module XMonad.Layout.Accordion (
     Accordion(Accordion)) where
 
 import XMonad
-import XMonad.Layouts
 import qualified XMonad.StackSet as W
 import Data.Ratio
 
diff --git a/XMonad/Layout/Dishes.hs b/XMonad/Layout/Dishes.hs
index 6066143..b83daf6 100644
--- a/XMonad/Layout/Dishes.hs
+++ b/XMonad/Layout/Dishes.hs
@@ -23,7 +23,6 @@ module XMonad.Layout.Dishes (
 
 import Data.List
 import XMonad
-import XMonad.Layouts
 import XMonad.StackSet (integrate)
 import Control.Monad (ap)
 
diff --git a/XMonad/Layout/DragPane.hs b/XMonad/Layout/DragPane.hs
index dfe47b1..f13eca3 100644
--- a/XMonad/Layout/DragPane.hs
+++ b/XMonad/Layout/DragPane.hs
@@ -31,7 +31,6 @@ module XMonad.Layout.DragPane (
 import XMonad
 import Data.Unique
 
-import XMonad.Layouts
 import qualified XMonad.StackSet as W 
 import XMonad.Util.Invisible
 import XMonad.Util.XUtils
diff --git a/XMonad/Layout/HintedTile.hs b/XMonad/Layout/HintedTile.hs
index 08e7e1f..d19451f 100644
--- a/XMonad/Layout/HintedTile.hs
+++ b/XMonad/Layout/HintedTile.hs
@@ -20,8 +20,7 @@ module XMonad.Layout.HintedTile (
                                  -- $usage
                                  HintedTile(..), Orientation(..)) where
 
-import XMonad
-import XMonad.Layouts    (Resize(..), IncMasterN(..))
+import XMonad hiding (Tall(..))
 import qualified XMonad.StackSet as W
 import Control.Applicative ((<$>))
 import Control.Monad
diff --git a/XMonad/Layout/LayoutCombinators.hs b/XMonad/Layout/LayoutCombinators.hs
index c2e262c..1cfd067 100644
--- a/XMonad/Layout/LayoutCombinators.hs
+++ b/XMonad/Layout/LayoutCombinators.hs
@@ -45,8 +45,7 @@ module XMonad.Layout.LayoutCombinators (
 
 import Data.Maybe ( isJust, isNothing )
 
-import XMonad.Core
-import XMonad.Layouts ( Tall(..), Mirror(..), ChangeLayout(NextLayout) )
+import XMonad hiding ((|||))
 import XMonad.Layout.Combo
 import XMonad.Layout.DragPane
 
diff --git a/XMonad/Layout/Mosaic.hs b/XMonad/Layout/Mosaic.hs
index 8f954b6..75ab348 100644
--- a/XMonad/Layout/Mosaic.hs
+++ b/XMonad/Layout/Mosaic.hs
@@ -27,7 +27,6 @@ import System.Random ( StdGen, mkStdGen )
 import Data.Maybe ( isJust )
 
 import XMonad hiding ( trace )
-import XMonad.Layouts ( Resize(Shrink, Expand) )
 import qualified XMonad.StackSet as W
 import qualified Data.Map as M
 import Data.List ( sort )
diff --git a/XMonad/Layout/MosaicAlt.hs b/XMonad/Layout/MosaicAlt.hs
index 884d219..16d87da 100644
--- a/XMonad/Layout/MosaicAlt.hs
+++ b/XMonad/Layout/MosaicAlt.hs
@@ -29,7 +29,6 @@ module XMonad.Layout.MosaicAlt (
     ) where
 
 import XMonad
-import XMonad.Layouts
 import qualified XMonad.StackSet as W
 import qualified Data.Map as M
 import Data.List ( sortBy )
diff --git a/XMonad/Layout/MultiToggle.hs b/XMonad/Layout/MultiToggle.hs
index e0ab8ba..e4ba768 100644
--- a/XMonad/Layout/MultiToggle.hs
+++ b/XMonad/Layout/MultiToggle.hs
@@ -45,7 +45,7 @@ import Data.Maybe
 --
 -- To use this module, you first have to define the transformers that you
 -- want to be handled by @MultiToggle@. For example, if the transformer is
--- 'XMonad.Layouts.Mirror':
+-- 'XMonad.Layout.Mirror':
 --
 -- > data MIRROR = MIRROR deriving (Read, Show, Eq, Typeable)
 -- > instance Transformer MIRROR Window where
@@ -65,7 +65,7 @@ import Data.Maybe
 --
 -- > layout = mkToggle (MIRROR ?? EOT) (tiled ||| Full)
 --
--- you can now dynamically apply the 'XMonad.Layouts.Mirror' transformation:
+-- you can now dynamically apply the 'XMonad.Layout.Mirror' transformation:
 --
 -- > ...
 -- >   , ((modMask,               xK_x     ), sendMessage $ Toggle MIRROR)
diff --git a/XMonad/Layout/ResizableTile.hs b/XMonad/Layout/ResizableTile.hs
index 00aaf85..9c32bbb 100644
--- a/XMonad/Layout/ResizableTile.hs
+++ b/XMonad/Layout/ResizableTile.hs
@@ -21,8 +21,7 @@ module XMonad.Layout.ResizableTile (
                                     ResizableTall(..), MirrorResize(..)
                                    ) where
 
-import XMonad
-import XMonad.Layouts (Resize(..), IncMasterN(..))
+import XMonad hiding (splitVertically, splitHorizontallyBy)
 import qualified XMonad.StackSet as W
 import Control.Monad
 
diff --git a/XMonad/Layout/Roledex.hs b/XMonad/Layout/Roledex.hs
index 50f842d..e5b1101 100644
--- a/XMonad/Layout/Roledex.hs
+++ b/XMonad/Layout/Roledex.hs
@@ -21,7 +21,6 @@ module XMonad.Layout.Roledex (
     Roledex(Roledex)) where
 
 import XMonad
-import XMonad.Layouts
 import qualified XMonad.StackSet as W
 import Data.Ratio
 
diff --git a/XMonad/Layout/Spiral.hs b/XMonad/Layout/Spiral.hs
index f341d08..33ee764 100644
--- a/XMonad/Layout/Spiral.hs
+++ b/XMonad/Layout/Spiral.hs
@@ -25,7 +25,6 @@ module XMonad.Layout.Spiral (
 
 import Data.Ratio
 import XMonad
-import XMonad.Layouts
 import XMonad.StackSet ( integrate )
 
 -- $usage
diff --git a/XMonad/Layout/ThreeColumns.hs b/XMonad/Layout/ThreeColumns.hs
index 494f338..b1561af 100644
--- a/XMonad/Layout/ThreeColumns.hs
+++ b/XMonad/Layout/ThreeColumns.hs
@@ -22,7 +22,6 @@ module XMonad.Layout.ThreeColumns (
 
 import XMonad
 import qualified XMonad.StackSet as W
-import XMonad.Layouts ( Resize(..), IncMasterN(..), splitVertically, splitHorizontallyBy )
 
 import Data.Ratio
 
diff --git a/XMonad/Layout/TwoPane.hs b/XMonad/Layout/TwoPane.hs
index e7ff399..24b3162 100644
--- a/XMonad/Layout/TwoPane.hs
+++ b/XMonad/Layout/TwoPane.hs
@@ -23,7 +23,6 @@ module XMonad.Layout.TwoPane (
                              ) where
 
 import XMonad hiding (focus)
-import XMonad.Layouts ( Resize(..), splitHorizontallyBy )
 import XMonad.StackSet ( focus, up, down)
 
 -- $usage