diff options
| author | Daniel Schoepe <asgaroth_@gmx.de> | 2009-01-28 22:54:06 +0100 |
|---|---|---|
| committer | Daniel Schoepe <asgaroth_@gmx.de> | 2009-01-28 22:54:06 +0100 |
| commit | 21943d95090614acde26969dc9f5ef8513a06799 (patch) | |
| tree | 825690ca1951c15e71af99d820ee4960489039df | |
| parent | d468b353b8004e74be115bc8ddd65f936ce2dc86 (diff) | |
| download | metatile-21943d95090614acde26969dc9f5ef8513a06799.tar metatile-21943d95090614acde26969dc9f5ef8513a06799.zip | |
Make X an instance of Typeable
Ignore-this: bb155e62ea4e451460e3b94508dc49d2
darcs-hash:20090128215406-cb1c6-89d81563549a976a6c9abd1e1dcc5c0e1412c9e5
| -rw-r--r-- | XMonad/Core.hs | 2 |
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 |