forked from xmonad/xmonad
-
-
Notifications
You must be signed in to change notification settings - Fork 0
Commit
This commit does not belong to any branch on this repository, and may belong to a fork outside of the repository.
Remove all instances of deriving Typeable
The derivation of Typeable has been automatic for quite a while now. Related: xmonad/xmonad-contrib#548
- Loading branch information
1 parent
d72da95
commit 9e5b16e
Showing
3 changed files
with
8 additions
and
8 deletions.
There are no files selected for viewing
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
Original file line number | Diff line number | Diff line change |
---|---|---|
|
@@ -8,7 +8,7 @@ | |
-- | ||
-- Maintainer : [email protected] | ||
-- Stability : unstable | ||
-- Portability : not portable, Typeable deriving, mtl, posix | ||
-- Portability : not portable, mtl, posix | ||
-- | ||
-- The collection of core layouts. | ||
-- | ||
|
@@ -35,10 +35,10 @@ import Data.Maybe (fromMaybe) | |
------------------------------------------------------------------------ | ||
|
||
-- | Change the size of the master pane. | ||
data Resize = Shrink | Expand deriving Typeable | ||
data Resize = Shrink | Expand | ||
|
||
-- | Increase the number of clients in the master pane. | ||
data IncMasterN = IncMasterN !Int deriving Typeable | ||
data IncMasterN = IncMasterN !Int | ||
|
||
instance Message Resize | ||
instance Message IncMasterN | ||
|
@@ -132,7 +132,7 @@ mirrorRect (Rectangle rx ry rw rh) = Rectangle ry rx rh rw | |
-- Layouts that transition between other layouts | ||
|
||
-- | Messages to change the current layout. | ||
data ChangeLayout = FirstLayout | NextLayout deriving (Eq, Show, Typeable) | ||
data ChangeLayout = FirstLayout | NextLayout deriving (Eq, Show) | ||
|
||
instance Message ChangeLayout | ||
|
||
|
@@ -147,7 +147,7 @@ data Choose l r a = Choose CLR (l a) (r a) deriving (Read, Show) | |
-- | Choose the current sub-layout (left or right) in 'Choose'. | ||
data CLR = CL | CR deriving (Read, Show, Eq) | ||
|
||
data NextNoWrap = NextNoWrap deriving (Eq, Show, Typeable) | ||
data NextNoWrap = NextNoWrap deriving (Eq, Show) | ||
instance Message NextNoWrap | ||
|
||
-- | A small wrapper around handleMessage, as it is tedious to write | ||
|
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
Original file line number | Diff line number | Diff line change |
---|---|---|
|
@@ -8,7 +8,7 @@ | |
-- | ||
-- Maintainer : [email protected] | ||
-- Stability : unstable | ||
-- Portability : not portable, Typeable deriving, mtl, posix | ||
-- Portability : not portable, mtl, posix | ||
-- | ||
-- Operations. | ||
-- | ||
|