diff options
| author | Adam Vogt <vogt.adam@gmail.com> | 2011-09-23 14:39:07 +0200 |
|---|---|---|
| committer | Adam Vogt <vogt.adam@gmail.com> | 2011-09-23 14:39:07 +0200 |
| commit | 83cd37211c4949ff8403f3eecff2a87facc3e834 (patch) | |
| tree | 3023be2061f491135245ff91cb6bc6d1472889fe | |
| parent | 7dfb6a88238429a661ef1ec724eb6f08c78d1434 (diff) | |
| download | XMonadContrib-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.hs | 2 |
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 ()) } -------------------------------------------------------------- |