Update XMonad.Config.Desktop for 0.12 ManageDocks

XMonad/Config/Desktop.hs

@@ -165,9 +165,10 @@ import qualified Data.Map as M
 --
 
 desktopConfig = ewmh def
-    { startupHook     = setDefaultCursor xC_left_ptr
+    { startupHook     = setDefaultCursor xC_left_ptr <+> docksStartupHook <+> startupHook def
     , layoutHook      = desktopLayoutModifiers $ layoutHook def
-    , manageHook      = manageHook def <+> manageDocks
+    , manageHook      = manageDocks <+> manageHook def
+    , handleEventHook = docksEventHook <+> handleEventHook def
     , keys            = desktopKeys <+> keys def }
 
 desktopKeys (XConfig {modMask = modm}) = M.fromList $

XMonad/Config/Gnome.hs

@@ -18,7 +18,8 @@ module XMonad.Config.Gnome (
     -- $usage
     gnomeConfig,
     gnomeRun,
-    gnomeRegister
+    gnomeRegister,
+    desktopLayoutModifiers
     ) where
 
 import XMonad

XMonad/Config/Kde.hs

@@ -17,7 +17,8 @@ module XMonad.Config.Kde (
     -- * Usage
     -- $usage
     kdeConfig,
-    kde4Config
+    kde4Config,
+    desktopLayoutModifiers
     ) where
 
 import XMonad

XMonad/Config/Mate.hs

@@ -20,7 +20,8 @@ module XMonad.Config.Mate (
     -- $usage
     mateConfig,
     mateRun,
-    mateRegister
+    mateRegister,
+    desktopLayoutModifiers
     ) where
 
 import XMonad

XMonad/Config/Xfce.hs

@@ -16,7 +16,8 @@
 module XMonad.Config.Xfce (
     -- * Usage
     -- $usage
-    xfceConfig
+    xfceConfig,
+    desktopLayoutModifiers
     ) where
 
 import XMonad