diff --git a/hadoop-rpc.cabal b/hadoop-rpc.cabal
--- a/hadoop-rpc.cabal
+++ b/hadoop-rpc.cabal
@@ -1,5 +1,5 @@
 name:          hadoop-rpc
-version:       0.1.1.0
+version:       0.1.1.1
 
 synopsis:
   Use the Hadoop RPC interface from Haskell.
diff --git a/src/Network/Hadoop/Hdfs.hs b/src/Network/Hadoop/Hdfs.hs
--- a/src/Network/Hadoop/Hdfs.hs
+++ b/src/Network/Hadoop/Hdfs.hs
@@ -64,11 +64,11 @@
     (<*>) = ap
 
 instance Monad Hdfs where
-    return  = pure
+    return  = Hdfs . const . return
     m >>= k = Hdfs $ \c -> unHdfs m c >>= \x -> unHdfs (k x) c
 
 instance MonadIO Hdfs where
-    liftIO io = Hdfs $ const io
+    liftIO = Hdfs . const
 
 instance MonadThrow Hdfs where
     throwM = liftIO . throwM