diff --git a/memcached-binary.cabal b/memcached-binary.cabal
index 75a10c2..77ba1ee 100644
--- a/memcached-binary.cabal
+++ b/memcached-binary.cabal
@@ -1,5 +1,5 @@
 name:                memcached-binary
-version:             0.1.1
+version:             0.1.1.1
 synopsis:            memcached client using binary protocol.
 description:         memcached client using binary protocol.
 license:             MIT
diff --git a/src/Database/Memcached/Binary/Internal.hs b/src/Database/Memcached/Binary/Internal.hs
index dbda76a..f65def6 100644
--- a/src/Database/Memcached/Binary/Internal.hs
+++ b/src/Database/Memcached/Binary/Internal.hs
@@ -36,7 +36,7 @@ withConnection i m = withSocketsDo $ bracket (connect i) close m
 
 connect :: ConnectInfo -> IO Connection
 connect i = fmap Connection $ 
-    createPool (putStrLn "open" >> connect' i) (\h -> putStrLn "closed" >> quit h >> hClose h) 1 
+    createPool (connect' i) (\h -> quit h >> hClose h) 1 
     (connectionIdleTime i) (numConnection i)
 
 connect' :: ConnectInfo -> IO Handle