From bc953a7e66fad3430db8be04916015f845bab79a Mon Sep 17 00:00:00 2001 From: Clemens Fruhwirth Date: Sun, 9 Aug 2009 15:10:55 +0200 Subject: Replace nextEvent with maskEvent to prevent GridSelect from swallowing unrelated events (such as map/unmap) Ignore-this: 6c3bc2487e4f011e0febe0935c223f2 darcs-hash:20090809131055-ed0c4-983bd18467496e2736ef99904d8fdb5392855517.gz --- XMonad/Actions/GridSelect.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'XMonad/Actions/GridSelect.hs') diff --git a/XMonad/Actions/GridSelect.hs b/XMonad/Actions/GridSelect.hs index b69671e..84c8b4f 100644 --- a/XMonad/Actions/GridSelect.hs +++ b/XMonad/Actions/GridSelect.hs @@ -179,7 +179,7 @@ updateElements elementmap = do eventLoop :: TwoD a (Maybe a) eventLoop = do (keysym,string,event) <- liftX $ withDisplay $ \d -> liftIO $ allocaXEvent $ \e -> do - nextEvent d e + maskEvent d (exposureMask .|. keyPressMask .|. buttonReleaseMask) e ev <- getEvent e (ks,s) <- if ev_event_type ev == keyPress then lookupString $ asKeyEvent e -- cgit v1.2.3