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

U.EZConfig allow removing more than one mouse binding.

Browse Source
This commit is contained in:
Adam Vogt 2011-09-23 12:39:07 +00:00
parent 41d23c1749
commit c00dd7b51b
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
XMonad/Util/EZConfig.hs
View File

@ -127,7 +127,7 @@ additionalMouseBindings conf mouseBindingsList =
removeMouseBindings :: XConfig a -> [(ButtonMask, Button)] -> XConfig a removeMouseBindings :: XConfig a -> [(ButtonMask, Button)] -> XConfig a
removeMouseBindings conf mouseBindingList = removeMouseBindings conf mouseBindingList =
conf { mouseBindings = \cnf -> mouseBindings conf cnf `M.difference` conf { mouseBindings = \cnf -> mouseBindings conf cnf `M.difference`
M.fromList (zip mouseBindingList $ return ()) } M.fromList (zip mouseBindingList $ repeat ()) }
-------------------------------------------------------------- --------------------------------------------------------------