X.H.EwmhDesktops: Fix _NET_ACTIVE_WINDOW requests from pagers being i…

…gnored

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

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))