From 6516064616b0b993a694cb4e8423a53c60a9b3c3 Mon Sep 17 00:00:00 2001 From: Brent Yorgey Date: Tue, 12 Jan 2010 18:25:07 +0100 Subject: suppress some warnings under ghc 6.12.1 and clean up redundant imports to get rid of some others. Ignore-this: bf3487b27036b02797d9f528a078d006 darcs-hash:20100112172507-1e371-1b466e62ac727b196330c72c8553116282ef5702.gz --- XMonad/Hooks/ManageDocks.hs | 1 - XMonad/Hooks/Place.hs | 2 +- XMonad/Hooks/Script.hs | 1 - XMonad/Hooks/ServerMode.hs | 1 - XMonad/Hooks/XPropManage.hs | 2 -- 5 files changed, 1 insertion(+), 6 deletions(-) (limited to 'XMonad/Hooks') diff --git a/XMonad/Hooks/ManageDocks.hs b/XMonad/Hooks/ManageDocks.hs index fff4a5c..084b02c 100644 --- a/XMonad/Hooks/ManageDocks.hs +++ b/XMonad/Hooks/ManageDocks.hs @@ -30,7 +30,6 @@ module XMonad.Hooks.ManageDocks ( ----------------------------------------------------------------------------- import XMonad import Foreign.C.Types (CLong) -import Control.Monad import XMonad.Layout.LayoutModifier import XMonad.Util.Types import XMonad.Util.WindowProperties (getProp32s) diff --git a/XMonad/Hooks/Place.hs b/XMonad/Hooks/Place.hs index 3c04b25..5faa0b7 100644 --- a/XMonad/Hooks/Place.hs +++ b/XMonad/Hooks/Place.hs @@ -42,7 +42,7 @@ import XMonad.Actions.FloatKeys import qualified Data.Map as M import Data.Ratio ((%)) import Data.List (sortBy, minimumBy, partition) -import Data.Maybe (maybe, fromMaybe, catMaybes) +import Data.Maybe (fromMaybe, catMaybes) import Data.Monoid (Endo(..)) import Control.Monad (guard, join) import Control.Monad.Trans (lift) diff --git a/XMonad/Hooks/Script.hs b/XMonad/Hooks/Script.hs index ef6bc10..8c6a486 100644 --- a/XMonad/Hooks/Script.hs +++ b/XMonad/Hooks/Script.hs @@ -26,7 +26,6 @@ module XMonad.Hooks.Script ( -- import XMonad -import Control.Monad.Trans import System.Directory -- $usage diff --git a/XMonad/Hooks/ServerMode.hs b/XMonad/Hooks/ServerMode.hs index db70c6b..c072f53 100644 --- a/XMonad/Hooks/ServerMode.hs +++ b/XMonad/Hooks/ServerMode.hs @@ -64,7 +64,6 @@ module XMonad.Hooks.ServerMode ) where import Control.Monad (when) -import Data.List import Data.Monoid import System.IO diff --git a/XMonad/Hooks/XPropManage.hs b/XMonad/Hooks/XPropManage.hs index 50678a5..e623aa8 100644 --- a/XMonad/Hooks/XPropManage.hs +++ b/XMonad/Hooks/XPropManage.hs @@ -18,13 +18,11 @@ module XMonad.Hooks.XPropManage ( ) where import Data.Char (chr) -import Data.List (concat) import Data.Monoid (mconcat, Endo(..)) import Control.Monad.Trans (lift) import XMonad -import XMonad.ManageHook ((-->)) -- $usage -- You can use this module with the following in your @~\/.xmonad\/xmonad.hs@: -- cgit v1.2.3