diff options
| author | Adam Vogt <vogt.adam@gmail.com> | 2014-04-23 00:11:05 +0200 |
|---|---|---|
| committer | Adam Vogt <vogt.adam@gmail.com> | 2014-04-23 00:11:05 +0200 |
| commit | 3f513d451d56cef60941727aeb71652df387a624 (patch) | |
| tree | f0b0897486b4a35f411aa1254a5ebce43520a3bc | |
| parent | a6a107ca14a49db50ae837ca69d4ff333660436b (diff) | |
| download | XMonadContrib-3f513d451d56cef60941727aeb71652df387a624.tar.gz XMonadContrib-3f513d451d56cef60941727aeb71652df387a624.tar.xz XMonadContrib-3f513d451d56cef60941727aeb71652df387a624.zip | |
Remove unneeded context with the IfMax layout instance
Ignore-this: 3b8ac316f56df6a84420754db769fb0
Extra constraints on instances are about as useful as -XDataTypeContexts
darcs-hash:20140422221105-1499c-beddf2399e373128b44faa1ffba7dfe9b68b76f7.gz
| -rw-r--r-- | XMonad/Layout/IfMax.hs | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/XMonad/Layout/IfMax.hs b/XMonad/Layout/IfMax.hs index c8b8cba..b9e75dc 100644 --- a/XMonad/Layout/IfMax.hs +++ b/XMonad/Layout/IfMax.hs @@ -47,8 +47,7 @@ import qualified XMonad.StackSet as W data IfMax l1 l2 w = IfMax Int (l1 w) (l2 w) deriving (Read, Show) -instance (LayoutClass l1 a, LayoutClass l2 a, Read a, Show a, Eq a, Typeable a) - => LayoutClass (IfMax l1 l2) a where +instance (LayoutClass l1 a, LayoutClass l2 a) => LayoutClass (IfMax l1 l2) a where runLayout (W.Workspace _ (IfMax n l1 l2) s) rect = arrange (W.integrate' s) where |