diff options
| -rw-r--r-- | XMonad/Actions/GridSelect.hs | 2 |
1 files changed, 1 insertions, 1 deletions
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 |