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 | eb878b5bf235ca70b192c8b5174de53b830a4885 (patch) | |
| tree | 825690ca1951c15e71af99d820ee4960489039df | |
| parent | 07afbd864c94887be9c12d956e728e85ffacfd5f (diff) | |
| download | xmonad-eb878b5bf235ca70b192c8b5174de53b830a4885.tar.gz xmonad-eb878b5bf235ca70b192c8b5174de53b830a4885.tar.xz xmonad-eb878b5bf235ca70b192c8b5174de53b830a4885.zip | |
Make X an instance of Typeable
Ignore-this: bb155e62ea4e451460e3b94508dc49d2
darcs-hash:20090128215406-cb1c6-89d81563549a976a6c9abd1e1dcc5c0e1412c9e5.gz
| -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 |