diff options
author | Spencer Janssen <sjanssen@cse.unl.edu> | 2007-12-08 00:38:27 +0100 |
---|---|---|
committer | Spencer Janssen <sjanssen@cse.unl.edu> | 2007-12-08 00:38:27 +0100 |
commit | fb927daed709343c2823857230ac91bb9b37fe76 (patch) | |
tree | 5033088116818d425d0930d2fea8e92ad3b20200 /XMonad/Actions/TagWindows.hs | |
parent | c2aff0e5ea8a51eb3a99f27f556a7411867442ef (diff) | |
download | XMonadContrib-fb927daed709343c2823857230ac91bb9b37fe76.tar.gz XMonadContrib-fb927daed709343c2823857230ac91bb9b37fe76.tar.xz XMonadContrib-fb927daed709343c2823857230ac91bb9b37fe76.zip |
Remove redundant imports
darcs-hash:20071207233827-a5988-9e41d51120499637f14d115f2cf1428edaf326bb.gz
Diffstat (limited to '')
-rw-r--r-- | XMonad/Actions/TagWindows.hs | 7 |
1 files changed, 2 insertions, 5 deletions
diff --git a/XMonad/Actions/TagWindows.hs b/XMonad/Actions/TagWindows.hs index 030338c..59ba9c7 100644 --- a/XMonad/Actions/TagWindows.hs +++ b/XMonad/Actions/TagWindows.hs @@ -26,14 +26,11 @@ module XMonad.Actions.TagWindows ( ) where import Data.List (nub,concat,sortBy) +import Control.Monad -import Control.Monad.State import XMonad.StackSet hiding (filter) import XMonad.Operations (windows, withFocused) -import Graphics.X11.Xlib -import Graphics.X11.Xlib.Extras - import XMonad.Prompt import XMonad hiding (workspaces) @@ -88,7 +85,7 @@ getTags w = withDisplay $ \d -> -- | check a window for the given tag hasTag :: String -> Window -> X Bool -hasTag s w = (s `elem`) `liftM` getTags w +hasTag s w = (s `elem`) `fmap` getTags w -- | add a tag to the existing ones addTag :: String -> Window -> X () |