aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorAdam Vogt <vogt.adam@gmail.com>2011-09-23 14:39:07 +0200
committerAdam Vogt <vogt.adam@gmail.com>2011-09-23 14:39:07 +0200
commit83cd37211c4949ff8403f3eecff2a87facc3e834 (patch)
tree3023be2061f491135245ff91cb6bc6d1472889fe
parent7dfb6a88238429a661ef1ec724eb6f08c78d1434 (diff)
downloadXMonadContrib-83cd37211c4949ff8403f3eecff2a87facc3e834.tar.gz
XMonadContrib-83cd37211c4949ff8403f3eecff2a87facc3e834.tar.xz
XMonadContrib-83cd37211c4949ff8403f3eecff2a87facc3e834.zip
U.EZConfig allow removing more than one mouse binding.
Ignore-this: 6f32ef805566f03977ea5c0fe0ace958 darcs-hash:20110923123907-1499c-0ad09e11f53a5d3d55aa95462f84bea5943fe2b1.gz
-rw-r--r--XMonad/Util/EZConfig.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/XMonad/Util/EZConfig.hs b/XMonad/Util/EZConfig.hs
index cecdc90..53f893a 100644
--- a/XMonad/Util/EZConfig.hs
+++ b/XMonad/Util/EZConfig.hs
@@ -127,7 +127,7 @@ additionalMouseBindings conf mouseBindingsList =
removeMouseBindings :: XConfig a -> [(ButtonMask, Button)] -> XConfig a
removeMouseBindings conf mouseBindingList =
conf { mouseBindings = \cnf -> mouseBindings conf cnf `M.difference`
- M.fromList (zip mouseBindingList $ return ()) }
+ M.fromList (zip mouseBindingList $ repeat ()) }
--------------------------------------------------------------