Thu Nov  8 14:57:16 PST 2012  Adam Vogt <vogt.adam@gmail.com>
  * Gut H.ICCCMFocus: issue 177 has been merged in core.
  
  Keep the module for now: the LG3D bit might still be useful
  and there's no need to break configs unnecessarily.
diff -rN -u old-XMonadContrib/XMonad/Hooks/ICCCMFocus.hs new-XMonadContrib/XMonad/Hooks/ICCCMFocus.hs
--- old-XMonadContrib/XMonad/Hooks/ICCCMFocus.hs	2012-11-14 23:07:15.699051848 -0800
+++ new-XMonadContrib/XMonad/Hooks/ICCCMFocus.hs	2012-11-14 23:07:15.982052555 -0800
@@ -18,6 +18,7 @@
 -- @
 -----------------------------------------------------------------------------
 module XMonad.Hooks.ICCCMFocus
+{-# DEPRECATED "XMonad.Hooks.ICCCMFocus: xmonad>0.10 core merged issue 177" #-}
 (
   atom_WM_TAKE_FOCUS  
 , takeFocusX
@@ -27,27 +28,11 @@
 import XMonad
 import XMonad.Hooks.SetWMName
 import qualified XMonad.StackSet as W
-import Control.Monad
-
-atom_WM_TAKE_FOCUS ::
-  X Atom
-atom_WM_TAKE_FOCUS =
-  getAtom "WM_TAKE_FOCUS"
 
 takeFocusX ::
   Window
   -> X ()
-takeFocusX w =
-  withWindowSet . const $ do
-    dpy       <- asks display
-    wmtakef   <- atom_WM_TAKE_FOCUS
-    wmprot    <- atom_WM_PROTOCOLS
-    protocols <- io $ getWMProtocols dpy w
-    when (wmtakef `elem` protocols) $
-      io . allocaXEvent $ \ev -> do
-          setEventType ev clientMessage
-          setClientMessageEvent ev w wmprot 32 wmtakef currentTime
-          sendEvent dpy w False noEventMask ev
+takeFocusX _w = return ()
 
 -- | The value to add to your log hook configuration.
 takeTopFocus ::