summaryrefslogtreecommitdiffstats
path: root/XMonad
diff options
context:
space:
mode:
authorDaniel Schoepe <asgaroth_@gmx.de>2009-01-28 22:54:06 +0100
committerDaniel Schoepe <asgaroth_@gmx.de>2009-01-28 22:54:06 +0100
commit21943d95090614acde26969dc9f5ef8513a06799 (patch)
tree825690ca1951c15e71af99d820ee4960489039df /XMonad
parentd468b353b8004e74be115bc8ddd65f936ce2dc86 (diff)
downloadmetatile-21943d95090614acde26969dc9f5ef8513a06799.tar
metatile-21943d95090614acde26969dc9f5ef8513a06799.zip
Make X an instance of Typeable
Ignore-this: bb155e62ea4e451460e3b94508dc49d2 darcs-hash:20090128215406-cb1c6-89d81563549a976a6c9abd1e1dcc5c0e1412c9e5
Diffstat (limited to 'XMonad')
-rw-r--r--XMonad/Core.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/XMonad/Core.hs b/XMonad/Core.hs
index e36e165..c86a170 100644
--- a/XMonad/Core.hs
+++ b/XMonad/Core.hs
@@ -125,7 +125,7 @@ data ScreenDetail = SD { screenRect :: !Rectangle } deriving (Eq,Show, Read)
--
newtype X a = X (ReaderT XConf (StateT XState IO) a)
#ifndef __HADDOCK__
- deriving (Functor, Monad, MonadIO, MonadState XState, MonadReader XConf)
+ deriving (Functor, Monad, MonadIO, MonadState XState, MonadReader XConf, Typeable)
#endif
instance Applicative X where