diff options
author | Adam Vogt <vogt.adam@gmail.com> | 2011-01-06 20:20:52 +0100 |
---|---|---|
committer | Adam Vogt <vogt.adam@gmail.com> | 2011-01-06 20:20:52 +0100 |
commit | d39d0313a88ce33f1bdfe5a5ae3e65ed688a19b0 (patch) | |
tree | cf190a8c4233ea65d806d6c0f83243d961049899 /XMonad | |
parent | 147dd389a765b0ee32f8e308af9ada18c9e8753b (diff) | |
download | XMonadContrib-d39d0313a88ce33f1bdfe5a5ae3e65ed688a19b0.tar.gz XMonadContrib-d39d0313a88ce33f1bdfe5a5ae3e65ed688a19b0.tar.xz XMonadContrib-d39d0313a88ce33f1bdfe5a5ae3e65ed688a19b0.zip |
H.ICCCMFocus had atom_WM_TAKE_FOCUS incorrectly removed
Ignore-this: c566320f252d9fe717080e2da37ff262
It is possible that this atom should be defined in the X11 library, but fix the
build of contrib for now. In any case, this would have to wait for a change and
release of the X11 binding.
rolling back:
Wed Jan 5 22:38:39 EST 2011 Adam Vogt <vogt.adam@gmail.com>
* Remove accidental atom_WM_TAKE_FOCUS from H.ICCCMFocus
The XMonad module exports this already
M ./XMonad/Hooks/ICCCMFocus.hs -7 +1
darcs-hash:20110106192052-1499c-00f08381db873f22c3b4b213f2ee81d4e38ee5a4.gz
Diffstat (limited to 'XMonad')
-rw-r--r-- | XMonad/Hooks/ICCCMFocus.hs | 8 |
1 files changed, 7 insertions, 1 deletions
diff --git a/XMonad/Hooks/ICCCMFocus.hs b/XMonad/Hooks/ICCCMFocus.hs index 43e302a..c059ad2 100644 --- a/XMonad/Hooks/ICCCMFocus.hs +++ b/XMonad/Hooks/ICCCMFocus.hs @@ -19,7 +19,8 @@ ----------------------------------------------------------------------------- module XMonad.Hooks.ICCCMFocus ( - takeFocusX + atom_WM_TAKE_FOCUS +, takeFocusX , takeTopFocus ) where @@ -28,6 +29,11 @@ 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 () |