mirror of
https://github.com/xmonad/xmonad-contrib.git
synced 2025-08-01 12:41:52 -07:00
Remove unneeded context with the IfMax layout instance
Extra constraints on instances are about as useful as -XDataTypeContexts
This commit is contained in:
@@ -47,8 +47,7 @@ import qualified XMonad.StackSet as W
|
|||||||
data IfMax l1 l2 w = IfMax Int (l1 w) (l2 w)
|
data IfMax l1 l2 w = IfMax Int (l1 w) (l2 w)
|
||||||
deriving (Read, Show)
|
deriving (Read, Show)
|
||||||
|
|
||||||
instance (LayoutClass l1 a, LayoutClass l2 a, Read a, Show a, Eq a, Typeable a)
|
instance (LayoutClass l1 a, LayoutClass l2 a) => LayoutClass (IfMax l1 l2) a where
|
||||||
=> LayoutClass (IfMax l1 l2) a where
|
|
||||||
|
|
||||||
runLayout (W.Workspace _ (IfMax n l1 l2) s) rect = arrange (W.integrate' s)
|
runLayout (W.Workspace _ (IfMax n l1 l2) s) rect = arrange (W.integrate' s)
|
||||||
where
|
where
|
||||||
|
Reference in New Issue
Block a user