@@ -49,7 +49,7 @@ import Control.Monad.RWS.Class
4949import Control.Monad.Trans.Class
5050import Control.Monad.Trans.Control
5151import Control.Monad.Trans.Either (EitherT)
52−import Control.Monad.Trans.Error (ErrorT)
52+import Control.Monad.Trans.Except (ExceptT)
5353import Control.Monad.Trans.Identity (IdentityT)
5454import Control.Monad.Trans.List (ListT)
5555import Control.Monad.Trans.Maybe (MaybeT)
@@ -130,7 +130,7 @@ TRANS(ReaderT r)
130130TRANS(ResourceT)
131131TRANS(Strict.StateT s)
132132TRANS(StateT s)
133−TRANS_CTX(Error e, ErrorT e)
133+TRANS(ExceptT s)
134134TRANS_CTX(Monoid w, Strict.WriterT w)
135135TRANS_CTX(Monoid w, WriterT w)
136136TRANS_CTX(Monoid w, Strict.RWST r w s)