twin/xmonad-contrib
1
0
Fork 0
mirror of https://github.com/xmonad/xmonad-contrib.git synced 2025-08-11 18:22:16 -07:00
Code Issues Packages Projects Releases Wiki Activity

Use maskEvent rather than nextEvent. Fixes rare segfaults

Browse Source
This commit is contained in:
Spencer Janssen
2007-08-14 17:04:16 +00:00
parent 300a017edf
commit 5e358c365e
1 changed files with 1 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
XPrompt.hs
View File

@@ -166,7 +166,7 @@ eventLoop action = do
d <- gets dpy d <- gets dpy
(keysym,string,event) <- io $ (keysym,string,event) <- io $
allocaXEvent $ \e -> do allocaXEvent $ \e -> do
nextEvent d e maskEvent d keyPressMask e
ev <- getEvent e ev <- getEvent e
(ks,s) <- lookupString $ asKeyEvent e (ks,s) <- lookupString $ asKeyEvent e
return (ks,s,ev) return (ks,s,ev)