aboutsummaryrefslogtreecommitdiffstats
path: root/XMonad/Config/Desktop.hs
diff options
context:
space:
mode:
authorDaniel Schoepe <asgaroth_@gmx.de>2009-02-03 17:00:46 +0100
committerDaniel Schoepe <asgaroth_@gmx.de>2009-02-03 17:00:46 +0100
commit43e952a307c22f7098963061f7f6127974158c13 (patch)
treeadeef00961b45644558d6068522e77b36f0b2ff9 /XMonad/Config/Desktop.hs
parenta76661c77c488d648dfdae72b2b8ab98d72c338d (diff)
downloadXMonadContrib-43e952a307c22f7098963061f7f6127974158c13.tar.gz
XMonadContrib-43e952a307c22f7098963061f7f6127974158c13.tar.xz
XMonadContrib-43e952a307c22f7098963061f7f6127974158c13.zip
Adjustments to use the new event hook feature instead of Hooks.EventHook
Ignore-this: f8c239bc8e301cbd6fa509ef748af542 darcs-hash:20090203160046-cb1c6-d66821c5b8a5a60e3b76148654c6e28806b37749.gz
Diffstat (limited to '')
-rw-r--r--XMonad/Config/Desktop.hs3
1 files changed, 2 insertions, 1 deletions
diff --git a/XMonad/Config/Desktop.hs b/XMonad/Config/Desktop.hs
index c68ae44..1959aa8 100644
--- a/XMonad/Config/Desktop.hs
+++ b/XMonad/Config/Desktop.hs
@@ -27,9 +27,10 @@ desktopConfig = defaultConfig
{ logHook = ewmhDesktopsLogHook
, layoutHook = desktopLayoutModifiers $ layoutHook defaultConfig
, manageHook = manageHook defaultConfig <+> manageDocks
+ , handleEventHook = ewmhDesktopsEventHook
, keys = \c -> desktopKeys c `M.union` keys defaultConfig c }
desktopKeys (XConfig {modMask = modm}) = M.fromList $
[ ((modm, xK_b), sendMessage ToggleStruts) ]
-desktopLayoutModifiers layout = avoidStruts $ ewmhDesktopsLayout layout
+desktopLayoutModifiers layout = avoidStruts layout