diff --git a/memcached-binary.cabal b/memcached-binary.cabal
--- 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
--- a/src/Database/Memcached/Binary/Internal.hs
+++ b/src/Database/Memcached/Binary/Internal.hs
@@ -36,7 +36,7 @@
 
 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