twin/xmonad
1
0
Fork 0
mirror of https://github.com/xmonad/xmonad.git synced 2025-08-07 23:51:52 -07:00
Code Issues Packages Projects Releases Wiki Activity

only grab button{1,2,3} for click-to-focus (scrollwheel shouldn't focus)

Browse Source
This commit is contained in:
Jason Creighton
2007-06-02 05:26:05 +00:00
parent 72a50ead89
commit a6098f6010
1 changed files with 3 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
Operations.hs
View File

@@ -244,8 +244,9 @@ rescreen = do
setButtonGrab :: Bool -> Window -> X () setButtonGrab :: Bool -> Window -> X ()
setButtonGrab grab w = withDisplay $ \d -> io $ setButtonGrab grab w = withDisplay $ \d -> io $
if grab if grab
then grabButton d anyButton anyModifier w False buttonPressMask then flip mapM_ [button1, button2, button3] $ \b ->
grabModeAsync grabModeSync none none grabButton d b anyModifier w False buttonPressMask
grabModeAsync grabModeSync none none
else ungrabButton d anyButton anyModifier w else ungrabButton d anyButton anyModifier w
-- --------------------------------------------------------------------- -- ---------------------------------------------------------------------