diff --git a/Data/Conduit/TMChan.hs b/Data/Conduit/TMChan.hs
--- a/Data/Conduit/TMChan.hs
+++ b/Data/Conduit/TMChan.hs
@@ -68,7 +68,7 @@
     -> (chan -> STM (Maybe a))  -- ^ The 'read' function.
     -> (chan -> STM ())         -- ^ The 'close' function.
     -> Source m a
-chanSource ch reader closer = src
+chanSource ch reader closer = ConduitM src
     where
         src = PipeM pull
         pull = do a <- liftSTM $ reader ch
@@ -84,7 +84,7 @@
     -> (chan -> a -> STM ())    -- ^ The 'write' function.
     -> (chan -> STM ())         -- ^ The 'close' function.
     -> Sink a m ()
-chanSink ch writer closer = sink
+chanSink ch writer closer = ConduitM sink
     where
         sink = NeedInput push close
 
diff --git a/stm-conduit.cabal b/stm-conduit.cabal
--- a/stm-conduit.cabal
+++ b/stm-conduit.cabal
@@ -1,5 +1,5 @@
 Name:                stm-conduit
-Version:             0.4.3
+Version:             1.0.0
 Synopsis:            Introduces conduits to channels, and promotes using
                      conduits concurrently.
 Description:         Provides two simple conduit wrappers around STM
@@ -24,7 +24,7 @@
       , transformers >= 0.2 && <= 0.4
       , stm          == 2.4.*
       , stm-chans    == 1.3.*
-      , conduit      == 0.5.*
+      , conduit      == 1.0.*
       , resourcet    >= 0.3 && < 0.5
 
     ghc-options: -Wall -fwarn-tabs -fwarn-unused-imports