diff --git a/CHANGELOG b/CHANGELOG
--- a/CHANGELOG
+++ b/CHANGELOG
@@ -1,3 +1,10 @@
+1.0.0.1
+
+* Use Safe instead of Trustworthy.
+
+  This requires a dependency on stm.
+
+
 1.0.0.0
 
 * Switch the associated data types StT and StM to associated type synonyms.
diff --git a/Control/Monad/Trans/Control.hs b/Control/Monad/Trans/Control.hs
--- a/Control/Monad/Trans/Control.hs
+++ b/Control/Monad/Trans/Control.hs
@@ -8,7 +8,7 @@
            , MultiParamTypeClasses #-}
 
 #if __GLASGOW_HASKELL__ >= 702
-{-# LANGUAGE Trustworthy #-}
+{-# LANGUAGE Safe #-}
 #endif
 
 #if MIN_VERSION_transformers(0,4,0)
@@ -61,15 +61,14 @@
 import Data.Maybe    ( Maybe )
 import Data.Either   ( Either )
 
-#if MIN_VERSION_base(4,3,0)
-import GHC.Conc.Sync ( STM )
-#endif
-
 #if MIN_VERSION_base(4,4,0)
-import           Control.Monad.ST.Lazy             ( ST )
-import qualified Control.Monad.ST.Strict as Strict ( ST )
+import           Control.Monad.ST.Lazy.Safe           ( ST )
+import qualified Control.Monad.ST.Safe      as Strict ( ST )
 #endif
 
+-- from stm:
+import Control.Monad.STM ( STM )
+
 -- from transformers:
 import Control.Monad.Trans.Class    ( MonadTrans )
 
@@ -348,9 +347,7 @@
 BASE((->) r)
 BASE(Identity)
 
-#if MIN_VERSION_base(4,3,0)
 BASE(STM)
-#endif
 
 #if MIN_VERSION_base(4,4,0)
 BASE(Strict.ST s)
diff --git a/monad-control.cabal b/monad-control.cabal
--- a/monad-control.cabal
+++ b/monad-control.cabal
@@ -1,5 +1,5 @@
 Name:                monad-control
-Version:             1.0.0.0
+Version:             1.0.0.1
 Synopsis:            Lift control operations, like exception catching, through monad transformers
 License:             BSD3
 License-file:        LICENSE
@@ -41,7 +41,8 @@
   Exposed-modules: Control.Monad.Trans.Control
 
   Build-depends: base                 >= 3     && < 5
+               , stm                  >= 2.3   && < 3
+               , transformers-base    >= 0.4.3 && < 0.5
                , transformers         >= 0.2   && < 0.5
-               , transformers-base    >= 0.4.2 && < 0.5
 
   Ghc-options: -Wall
