diff --git a/Control/Monad/Trans/Region/Instances/MonadsTF.hs b/Control/Monad/Trans/Region/Instances/MonadsTF.hs
--- a/Control/Monad/Trans/Region/Instances/MonadsTF.hs
+++ b/Control/Monad/Trans/Region/Instances/MonadsTF.hs
@@ -1,6 +1,6 @@
 {-# LANGUAGE UnicodeSyntax
-           , TypeFamilies
            , NoImplicitPrelude
+           , TypeFamilies
   #-}
 
 -------------------------------------------------------------------------------
@@ -17,7 +17,7 @@
 module Control.Monad.Trans.Region.Instances.MonadsTF where
 
 -- from monads-fd:
--- TODO: import Control.Monad.Cont.Class   ( MonadCont, callCC )
+import Control.Monad.Cont.Class   ( MonadCont, callCC )
 import Control.Monad.Error.Class  ( MonadError, ErrorType, throwError, catchError )
 import Control.Monad.RWS.Class    ( MonadRWS )
 import Control.Monad.Reader.Class ( MonadReader, EnvType, ask, local )
@@ -32,14 +32,13 @@
 
 -- from regions:
 import Control.Monad.Trans.Region ( RegionT
+                                  , liftCallCC
                                   , liftCatch
                                   , mapRegionT
-                                  -- TODO: , liftCallCC
                                   )
 
--- TODO:
--- instance Monad pr ⇒ MonadCont (RegionT s pr) where
---     callCC = liftCallCC callCC
+instance MonadCont pr ⇒ MonadCont (RegionT s pr) where
+    callCC = liftCallCC callCC
 
 instance MonadError pr ⇒ MonadError (RegionT s pr) where
 
diff --git a/regions-monadstf.cabal b/regions-monadstf.cabal
--- a/regions-monadstf.cabal
+++ b/regions-monadstf.cabal
@@ -1,10 +1,10 @@
 name:          regions-monadstf
-version:       0.3
+version:       0.3.1
 cabal-version: >=1.6
 build-type:    Simple
 license:       BSD3
 license-file:  LICENSE
-copyright:     2009 Bas van Dijk
+copyright:     2010 Bas van Dijk
 author:        Bas van Dijk
 maintainer:    Bas van Dijk <v.dijk.bas@gmail.com>
 stability:     experimental
@@ -19,7 +19,6 @@
   GHC-Options: -Wall -fno-warn-orphans
   build-depends: base-unicode-symbols >= 0.1.1 && < 0.2
                , transformers         >= 0.1.4 && < 0.2
-               , regions              == 0.3.*
+               , regions              == 0.4.*
                , monads-tf            == 0.0.*
   exposed-modules: Control.Monad.Trans.Region.Instances.MonadsTF
-