diff options
author | Adam Vogt <vogt.adam@gmail.com> | 2009-07-05 22:12:05 +0200 |
---|---|---|
committer | Adam Vogt <vogt.adam@gmail.com> | 2009-07-05 22:12:05 +0200 |
commit | 595021f9a0b70483a7e26337bab8b2da68cd4757 (patch) | |
tree | 3800d5ee909f007a77205f5484a732d12a988675 /XMonad/Config/Monad.hs | |
parent | 29c6f55759fc8a080c7dddf7094ec0e3a896df39 (diff) | |
download | XMonadContrib-595021f9a0b70483a7e26337bab8b2da68cd4757.tar.gz XMonadContrib-595021f9a0b70483a7e26337bab8b2da68cd4757.tar.xz XMonadContrib-595021f9a0b70483a7e26337bab8b2da68cd4757.zip |
Remove trailing whitespace from many modules
Ignore-this: 1e28ff0974578d329bd3d593c1a5125e
darcs-hash:20090705201205-1499c-581bd0bb43ab6096eccded6edbd54a7a2007b0d9.gz
Diffstat (limited to 'XMonad/Config/Monad.hs')
-rw-r--r-- | XMonad/Config/Monad.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/XMonad/Config/Monad.hs b/XMonad/Config/Monad.hs index db29097..4294049 100644 --- a/XMonad/Config/Monad.hs +++ b/XMonad/Config/Monad.hs @@ -38,7 +38,7 @@ layout = fromSetGet (\x c -> c { layoutHook = x }) layoutHook terminal = fromSetGet (\x c -> c { X.terminal = x }) X.terminal keys = fromSetGet (\x c -> c { X.keys = x }) X.keys -set :: Accessor (XConfig LayoutList) a -> a -> Config () +set :: Accessor (XConfig LayoutList) a -> a -> Config () set r x = tell (mkW $ r ^= x) add r x = tell (mkW (r ^: mappend x)) |