ghc-xmonad-contrib/xmonad-contrib-0.10-ewmh-se...

12 lines
631 B
Diff

diff -u xmonad-contrib-0.10/XMonad/Hooks/EwmhDesktops.hs\~ xmonad-contrib-0.10/XMonad/Hooks/EwmhDesktops.hs
--- xmonad-contrib-0.10/XMonad/Hooks/EwmhDesktops.hs~ 2011-11-19 08:26:06.000000000 +0900
+++ xmonad-contrib-0.10/XMonad/Hooks/EwmhDesktops.hs 2012-03-09 16:59:48.115503713 +0900
@@ -252,3 +252,7 @@
a <- getAtom "_NET_ACTIVE_WINDOW"
c <- getAtom "WINDOW"
io $ changeProperty32 dpy r a c propModeReplace [fromIntegral w]
+ -- init _NET_WM_STATE to prevent gtk3 making apps look unfocused
+ a' <- getAtom "_NET_WM_STATE"
+ c' <- getAtom "ATOM"
+ io $ changeProperty32 dpy w a' c' propModeAppend []