aboutsummaryrefslogtreecommitdiffstats
path: root/XMonad/Config/Sjanssen.hs
diff options
context:
space:
mode:
authorSpencer Janssen <spencerjanssen@gmail.com>2009-10-23 05:50:43 +0200
committerSpencer Janssen <spencerjanssen@gmail.com>2009-10-23 05:50:43 +0200
commite75f0cdb019414deb81f14ff4f73ccd73c6f23b2 (patch)
tree0203382d7872b3c9f437c5458a9c6fff584cee1f /XMonad/Config/Sjanssen.hs
parent073cc91641642c9ee760e5c3453a767b23c9ddc7 (diff)
downloadXMonadContrib-e75f0cdb019414deb81f14ff4f73ccd73c6f23b2.tar.gz
XMonadContrib-e75f0cdb019414deb81f14ff4f73ccd73c6f23b2.tar.xz
XMonadContrib-e75f0cdb019414deb81f14ff4f73ccd73c6f23b2.zip
Use 'ewmh' in relevant configs
Ignore-this: 7cac9c6c3795a3fb60899db29cc65d08 darcs-hash:20091023035043-25a6b-a6e2420febdeb9e9710167f852451c2fd7021869.gz
Diffstat (limited to '')
-rw-r--r--XMonad/Config/Sjanssen.hs4
1 files changed, 1 insertions, 3 deletions
diff --git a/XMonad/Config/Sjanssen.hs b/XMonad/Config/Sjanssen.hs
index 4182c8e..d97d518 100644
--- a/XMonad/Config/Sjanssen.hs
+++ b/XMonad/Config/Sjanssen.hs
@@ -26,7 +26,7 @@ sjanssenConfigXmobar = statusBar "exec xmobar" sjanssenPP strutkey =<< sjanssenC
sjanssenConfig = do
sp <- mkSpawner
- return $ defaultConfig
+ return . ewmh $ defaultConfig
{ terminal = "exec urxvt"
, workspaces = ["irc", "web"] ++ map show [3 .. 9 :: Int]
, mouseBindings = \(XConfig {modMask = modm}) -> M.fromList $
@@ -35,8 +35,6 @@ sjanssenConfig = do
, ((modm.|. shiftMask, button1), (\w -> focus w >> mouseResizeWindow w)) ]
, keys = \c -> mykeys sp c `M.union` keys defaultConfig c
, layoutHook = modifiers layouts
- , logHook = ewmhDesktopsLogHook
- , startupHook = ewmhDesktopsStartup
, manageHook = composeAll [className =? x --> doShift w
| (x, w) <- [ ("Firefox", "web")
, ("Ktorrent", "7")