summaryrefslogtreecommitdiff
path: root/community/xmonad-contrib/remove_unnecessary_contexts.patch
diff options
context:
space:
mode:
Diffstat (limited to 'community/xmonad-contrib/remove_unnecessary_contexts.patch')
-rw-r--r--community/xmonad-contrib/remove_unnecessary_contexts.patch21
1 files changed, 21 insertions, 0 deletions
diff --git a/community/xmonad-contrib/remove_unnecessary_contexts.patch b/community/xmonad-contrib/remove_unnecessary_contexts.patch
new file mode 100644
index 000000000..cecf19e76
--- /dev/null
+++ b/community/xmonad-contrib/remove_unnecessary_contexts.patch
@@ -0,0 +1,21 @@
+diff -aur xmonad-contrib-0.11.2/XMonad/Layout/MultiToggle.hs xmonad-contrib-new/XMonad/Layout/MultiToggle.hs
+--- xmonad-contrib-0.11.2/XMonad/Layout/MultiToggle.hs 2013-07-16 04:52:11.000000000 +0200
++++ xmonad-contrib-new/XMonad/Layout/MultiToggle.hs 2014-04-27 21:26:20.746206511 +0200
+@@ -99,7 +99,7 @@
+ transform :: (LayoutClass l a) => t -> l a ->
+ (forall l'. (LayoutClass l' a) => l' a -> (l' a -> l a) -> b) -> b
+
+-data (LayoutClass l a) => EL l a = forall l'. (LayoutClass l' a) => EL (l' a) (l' a -> l a)
++data EL l a = forall l'. (LayoutClass l' a) => EL (l' a) (l' a -> l a)
+
+ unEL :: (LayoutClass l a) => EL l a -> (forall l'. (LayoutClass l' a) => l' a -> b) -> b
+ unEL (EL x _) k = k x
+@@ -159,7 +159,7 @@
+ infixr 0 ??
+ -- | Prepend an element to a heterogeneous list. Used to build transformer
+ -- tables for 'mkToggle'.
+-(??) :: (HList b w) => a -> b -> HCons a b
++(??) :: a -> b -> HCons a b
+ (??) = HCons
+
+ -- | Construct a singleton transformer table.