X.H.EwmhDesktops: Fix _NET_ACTIVE_WINDOW requests from pagers being ignored

This makes window switching apps like rofi and alttab able to activate
windows even if the logHook doesn't activate them (which it doesn't by
default, and that's a regression).

Fixes: 45052b9 ("X.H.EwmhDesktops. run 'logHook' for activated window.")
Related: #396
Related: #110
Related: #192

Author: liskin

XMonad/Hooks/EwmhDesktops.hs

@@ -265,6 +265,10 @@ handle f ClientMessageEvent{ev_window = w, ev_message_type = mt, ev_data = d} =
                 windows $ W.shiftWin (W.tag ww) w
             | mt == a_d ->
                 trace $ "Bad _NET_WM_DESKTOP with data=" ++ show d
+            | mt == a_aw, 2 : _ <- d ->
+                -- when the request comes from a pager, honor it unconditionally
+                -- https://specifications.freedesktop.org/wm-spec/wm-spec-1.3.html#sourceindication
+                windows $ W.focusWindow w
             | mt == a_aw -> do
                 lh <- asks (logHook . config)
                 XS.put (NetActivated (Just w))