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

submapDefault fix key leakage

Browse Source
This commit is contained in:
Anders Engstrom
2009-04-26 17:10:02 +00:00
parent ea61ad0f47
commit 823ea115ae
1 changed files with 2 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
XMonad/Actions/Submap.hs
View File

@@ -75,7 +75,7 @@ submapDefault def keys = do
then nextkey then nextkey
else return (m, keysym) else return (m, keysym)
io $ ungrabKeyboard d currentTime
m' <- cleanMask m m' <- cleanMask m
maybe def id (M.lookup (m', s) keys) maybe def id (M.lookup (m', s) keys)
io $ ungrabKeyboard d currentTime