diff --git a/src/Unlift/Pool.hs b/src/Unlift/Pool.hs
--- a/src/Unlift/Pool.hs
+++ b/src/Unlift/Pool.hs
@@ -27,7 +27,7 @@
 withResource :: MonadUnliftIO m => Pool a -> (a -> m b) -> m b
 withResource pool action =
   withRunInIO $ \io ->
-    liftIO $ withResource pool $ \a ->
+    liftIO $ P.withResource pool $ \a ->
       io $ action a
 
 takeResource :: MonadUnliftIO m => Pool a -> m (a, LocalPool a)
diff --git a/unliftio-pool.cabal b/unliftio-pool.cabal
--- a/unliftio-pool.cabal
+++ b/unliftio-pool.cabal
@@ -1,5 +1,5 @@
 name:                unliftio-pool
-version:             0.1.0.0
+version:             0.1.0.1
 synopsis:            Data.Pool generalized to MonadUnliftIO.
 description:         This is a generalization of Data.Pool to MonadUnliftIO.
 license:             BSD3