From fb927daed709343c2823857230ac91bb9b37fe76 Mon Sep 17 00:00:00 2001 From: Spencer Janssen Date: Sat, 8 Dec 2007 00:38:27 +0100 Subject: Remove redundant imports darcs-hash:20071207233827-a5988-9e41d51120499637f14d115f2cf1428edaf326bb.gz --- XMonad/Layout/Circle.hs | 1 - XMonad/Layout/DragPane.hs | 2 -- XMonad/Layout/HintedTile.hs | 2 +- XMonad/Layout/LayoutHints.hs | 3 --- XMonad/Layout/LayoutModifier.hs | 1 - XMonad/Layout/LayoutScreens.hs | 4 ---- XMonad/Layout/MagicFocus.hs | 1 - XMonad/Layout/Magnifier.hs | 1 - XMonad/Layout/Maximize.hs | 1 - XMonad/Layout/Mosaic.hs | 2 -- XMonad/Layout/NoBorders.hs | 4 ---- XMonad/Layout/PerWorkspace.hs | 1 - XMonad/Layout/ResizableTile.hs | 1 - XMonad/Layout/Spiral.hs | 1 - XMonad/Layout/Tabbed.hs | 5 ----- XMonad/Layout/ThreeColumns.hs | 5 +---- XMonad/Layout/WindowNavigation.hs | 5 +---- 17 files changed, 3 insertions(+), 37 deletions(-) (limited to 'XMonad/Layout') diff --git a/XMonad/Layout/Circle.hs b/XMonad/Layout/Circle.hs index c37873c..d2cf26f 100644 --- a/XMonad/Layout/Circle.hs +++ b/XMonad/Layout/Circle.hs @@ -21,7 +21,6 @@ module XMonad.Layout.Circle ( ) where -- actually it's an ellipse import Data.List -import Graphics.X11.Xlib import XMonad import XMonad.StackSet (integrate, peek) diff --git a/XMonad/Layout/DragPane.hs b/XMonad/Layout/DragPane.hs index d02cd65..07d90f2 100644 --- a/XMonad/Layout/DragPane.hs +++ b/XMonad/Layout/DragPane.hs @@ -28,8 +28,6 @@ module XMonad.Layout.DragPane ( , DragPane, DragType (..) ) where -import Graphics.X11.Xlib -import Graphics.X11.Xlib.Extras import XMonad import Data.Bits import Data.Unique diff --git a/XMonad/Layout/HintedTile.hs b/XMonad/Layout/HintedTile.hs index b05f9e6..a3a81d7 100644 --- a/XMonad/Layout/HintedTile.hs +++ b/XMonad/Layout/HintedTile.hs @@ -27,7 +27,7 @@ import qualified XMonad.StackSet as W import Graphics.X11.Xlib import Graphics.X11.Xlib.Extras import Control.Applicative ((<$>)) -import Control.Monad.Reader +import Control.Monad -- $usage -- You can use this module with the following in your @~\/.xmonad\/xmonad.hs@: diff --git a/XMonad/Layout/LayoutHints.hs b/XMonad/Layout/LayoutHints.hs index 67e3e57..1639873 100644 --- a/XMonad/Layout/LayoutHints.hs +++ b/XMonad/Layout/LayoutHints.hs @@ -20,11 +20,8 @@ module XMonad.Layout.LayoutHints ( LayoutHints) where import XMonad.Operations ( applySizeHints, D ) -import Graphics.X11.Xlib -import Graphics.X11.Xlib.Extras ( getWMNormalHints ) import XMonad hiding ( trace ) import XMonad.Layout.LayoutModifier -import Control.Monad.Reader ( asks ) -- $usage -- You can use this module with the following in your @~\/.xmonad\/xmonad.hs@: diff --git a/XMonad/Layout/LayoutModifier.hs b/XMonad/Layout/LayoutModifier.hs index 15b0619..da0fad2 100644 --- a/XMonad/Layout/LayoutModifier.hs +++ b/XMonad/Layout/LayoutModifier.hs @@ -20,7 +20,6 @@ module XMonad.Layout.LayoutModifier ( LayoutModifier(..), ModifiedLayout(..) ) where -import Graphics.X11.Xlib ( Rectangle ) import XMonad import XMonad.StackSet ( Stack ) diff --git a/XMonad/Layout/LayoutScreens.hs b/XMonad/Layout/LayoutScreens.hs index deefbae..73b29af 100644 --- a/XMonad/Layout/LayoutScreens.hs +++ b/XMonad/Layout/LayoutScreens.hs @@ -18,13 +18,9 @@ module XMonad.Layout.LayoutScreens ( layoutScreens, fixedLayout ) where -import Control.Monad.Reader ( asks ) - import XMonad import qualified XMonad.StackSet as W import qualified XMonad.Operations as O -import Graphics.X11.Xlib -import Graphics.X11.Xlib.Extras -- $usage -- This module allows you to pretend that you have more than one screen by diff --git a/XMonad/Layout/MagicFocus.hs b/XMonad/Layout/MagicFocus.hs index 1d2ccee..2a69df5 100644 --- a/XMonad/Layout/MagicFocus.hs +++ b/XMonad/Layout/MagicFocus.hs @@ -19,7 +19,6 @@ module XMonad.Layout.MagicFocus MagicFocus(MagicFocus) ) where -import Graphics.X11.Xlib import XMonad import XMonad.StackSet diff --git a/XMonad/Layout/Magnifier.hs b/XMonad/Layout/Magnifier.hs index 8ac5213..ebe74de 100644 --- a/XMonad/Layout/Magnifier.hs +++ b/XMonad/Layout/Magnifier.hs @@ -25,7 +25,6 @@ module XMonad.Layout.Magnifier MagnifyMsg (..) ) where -import Graphics.X11.Xlib (Window, Rectangle(..)) import XMonad import XMonad.StackSet import XMonad.Layout.LayoutModifier diff --git a/XMonad/Layout/Maximize.hs b/XMonad/Layout/Maximize.hs index 7eb6e8b..28d17a2 100644 --- a/XMonad/Layout/Maximize.hs +++ b/XMonad/Layout/Maximize.hs @@ -23,7 +23,6 @@ module XMonad.Layout.Maximize ( maximizeRestore ) where -import Graphics.X11.Xlib import XMonad import XMonad.Layout.LayoutModifier import Data.List ( partition ) diff --git a/XMonad/Layout/Mosaic.hs b/XMonad/Layout/Mosaic.hs index 5dcd334..71d38ac 100644 --- a/XMonad/Layout/Mosaic.hs +++ b/XMonad/Layout/Mosaic.hs @@ -26,8 +26,6 @@ import Control.Monad.State ( State, put, get, runState ) import System.Random ( StdGen, mkStdGen ) import Data.Maybe ( isJust ) -import Graphics.X11.Xlib -import Graphics.X11.Xlib.Extras ( SizeHints, getWMNormalHints, sh_aspect, sh_min_size, sh_max_size ) import XMonad hiding ( trace ) import XMonad.Layouts ( Resize(Shrink, Expand) ) import qualified XMonad.StackSet as W diff --git a/XMonad/Layout/NoBorders.hs b/XMonad/Layout/NoBorders.hs index 25ae380..6b022ed 100644 --- a/XMonad/Layout/NoBorders.hs +++ b/XMonad/Layout/NoBorders.hs @@ -25,10 +25,6 @@ module XMonad.Layout.NoBorders ( withBorder ) where -import Control.Monad.State (gets) -import Control.Monad.Reader (asks) -import Graphics.X11.Xlib - import XMonad import XMonad.Layout.LayoutModifier import qualified XMonad.StackSet as W diff --git a/XMonad/Layout/PerWorkspace.hs b/XMonad/Layout/PerWorkspace.hs index ce63af9..25de2c8 100644 --- a/XMonad/Layout/PerWorkspace.hs +++ b/XMonad/Layout/PerWorkspace.hs @@ -24,7 +24,6 @@ module XMonad.Layout.PerWorkspace ( import XMonad import qualified XMonad.StackSet as W -import Control.Monad.State (gets) import Data.Maybe (fromMaybe) -- $usage diff --git a/XMonad/Layout/ResizableTile.hs b/XMonad/Layout/ResizableTile.hs index 97b4504..ca73a7c 100644 --- a/XMonad/Layout/ResizableTile.hs +++ b/XMonad/Layout/ResizableTile.hs @@ -25,7 +25,6 @@ import XMonad import XMonad.Layouts (Resize(..), IncMasterN(..)) import qualified XMonad.StackSet as W import Graphics.X11.Xlib -import Control.Monad.State import Control.Monad -- $usage diff --git a/XMonad/Layout/Spiral.hs b/XMonad/Layout/Spiral.hs index b4b3b8a..f341d08 100644 --- a/XMonad/Layout/Spiral.hs +++ b/XMonad/Layout/Spiral.hs @@ -23,7 +23,6 @@ module XMonad.Layout.Spiral ( , Direction (..) ) where -import Graphics.X11.Xlib import Data.Ratio import XMonad import XMonad.Layouts diff --git a/XMonad/Layout/Tabbed.hs b/XMonad/Layout/Tabbed.hs index 1ddf214..a3c6ac2 100644 --- a/XMonad/Layout/Tabbed.hs +++ b/XMonad/Layout/Tabbed.hs @@ -22,14 +22,9 @@ module XMonad.Layout.Tabbed ( , Shrinker(..) ) where -import Control.Monad.State ( gets ) -import Control.Monad.Reader import Data.Maybe import Data.List -import Graphics.X11.Xlib -import Graphics.X11.Xlib.Extras - import XMonad import XMonad.Operations import qualified XMonad.StackSet as W diff --git a/XMonad/Layout/ThreeColumns.hs b/XMonad/Layout/ThreeColumns.hs index 0612c3d..494f338 100644 --- a/XMonad/Layout/ThreeColumns.hs +++ b/XMonad/Layout/ThreeColumns.hs @@ -26,10 +26,7 @@ import XMonad.Layouts ( Resize(..), IncMasterN(..), splitVertically, splitHorizo import Data.Ratio ---import Control.Monad.State -import Control.Monad.Reader - -import Graphics.X11.Xlib +import Control.Monad -- $usage -- You can use this module with the following in your @~\/.xmonad\/xmonad.hs@: diff --git a/XMonad/Layout/WindowNavigation.hs b/XMonad/Layout/WindowNavigation.hs index a826798..78592b7 100644 --- a/XMonad/Layout/WindowNavigation.hs +++ b/XMonad/Layout/WindowNavigation.hs @@ -25,11 +25,8 @@ module XMonad.Layout.WindowNavigation ( noNavigateBorders, defaultWNConfig ) where -import Graphics.X11.Xlib ( Rectangle(..), Window, Pixel, setWindowBorder ) -import Control.Monad.Reader ( ask ) -import Control.Monad.State ( gets, modify ) import Data.List ( nub, sortBy, (\\) ) -import XMonad +import XMonad hiding (Point) import qualified XMonad.StackSet as W import XMonad.Operations ( windows ) import XMonad.Layout.LayoutModifier -- cgit v1.2.3