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/Layout/TwoPane.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/Layout/TwoPane.hs')
| -rw-r--r-- | XMonad/Layout/TwoPane.hs | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/XMonad/Layout/TwoPane.hs b/XMonad/Layout/TwoPane.hs index 941209a..ef43ae1 100644 --- a/XMonad/Layout/TwoPane.hs +++ b/XMonad/Layout/TwoPane.hs @@ -5,7 +5,7 @@ -- Module : XMonad.Layout.TwoPane -- Copyright : (c) Spencer Janssen <spencerjanssen@gmail.com> -- License : BSD3-style (see LICENSE) --- +-- -- Maintainer : Spencer Janssen <spencerjanssen@gmail.com> -- Stability : unstable -- Portability : unportable @@ -39,8 +39,8 @@ import XMonad.StackSet ( focus, up, down) -- -- "XMonad.Doc.Extending#Editing_the_layout_hook" -data TwoPane a = - TwoPane Rational Rational +data TwoPane a = + TwoPane Rational Rational deriving ( Show, Read ) instance LayoutClass TwoPane a where @@ -53,7 +53,7 @@ instance LayoutClass TwoPane a where [] -> [(focus st, rect)] where (left, right) = splitHorizontallyBy split rect - handleMessage (TwoPane delta split) x = + handleMessage (TwoPane delta split) x = return $ case fromMessage x of Just Shrink -> Just (TwoPane delta (split - delta)) Just Expand -> Just (TwoPane delta (split + delta)) |