Mercurial > dotfiles

comparison .xmonad/xmonad.hs @ 266:93a8f55a4e30

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
xmonad: add takeTopFocus logHook This is required to make IntelliJ (and supposedly all other Swing applications) properly notice that they've recieved the focus. According to [0], the problem is that "xmonad does not follow ICCCM and ignores WM_TAKE_FOCUS protocol", but the patches on that ticket haven't yet been accepted, so the function was added to xmonad-contrib as a workaround until something happens in xmonad proper. [0]: http://code.google.com/p/xmonad/issues/detail?id=177
author Augie Fackler <durin42@gmail.com>
date Wed, 02 Nov 2011 09:53:57 -0500
parents fed8445581bb
children 64e73453e43f
comparison
equal deleted inserted replaced
265:09c0d4ed07f3 266:93a8f55a4e30
1 import XMonad 1 import XMonad
2 2
3 import XMonad 3 import XMonad
4 import XMonad.Config.Gnome 4 import XMonad.Config.Gnome
5 import XMonad.Hooks.ManageDocks 5 import XMonad.Hooks.ManageDocks
6 import XMonad.Hooks.ICCCMFocus
6 import XMonad.Layout 7 import XMonad.Layout
7 import XMonad.Layout.Column 8 import XMonad.Layout.Column
8 import XMonad.Layout.LayoutBuilder 9 import XMonad.Layout.LayoutBuilder
9 import XMonad.Util.EZConfig 10 import XMonad.Util.EZConfig
10 import XMonad.Util.Run(spawnPipe) 11 import XMonad.Util.Run(spawnPipe)
24 main = do 25 main = do
25 xmonad $ gnomeConfig 26 xmonad $ gnomeConfig
26 { terminal = "urxvt -sr -bg Black -fg White" 27 { terminal = "urxvt -sr -bg Black -fg White"
27 , modMask = mod4Mask 28 , modMask = mod4Mask
28 , layoutHook = avoidStruts myLayout 29 , layoutHook = avoidStruts myLayout
30 , logHook = takeTopFocus
29 } `additionalKeys` [ 31 } `additionalKeys` [
30 ((mod4Mask, xK_a), spawn "gnome-screensaver-command --lock") 32 ((mod4Mask, xK_a), spawn "gnome-screensaver-command --lock")
31 , ((mod4Mask, xK_p), spawn myDmenuTitleBar) 33 , ((mod4Mask, xK_p), spawn myDmenuTitleBar)
32 ] 34 ]