diff --git a/src/Network/XmlPush/HttpPush/Tls.hs b/src/Network/XmlPush/HttpPush/Tls.hs
--- a/src/Network/XmlPush/HttpPush/Tls.hs
+++ b/src/Network/XmlPush/HttpPush/Tls.hs
@@ -112,7 +112,7 @@
 				Just hi -> return hi
 				_ -> retry
 		(`Cl.run` g) $ do
-			t <- Cl.open' h hn cs kcs ca
+			t <- Cl.open h cs kcs ca
 			runPipe_ $ fromTChan otc
 				=$= filter isJust
 				=$= convert fromJust
diff --git a/xml-push.cabal b/xml-push.cabal
--- a/xml-push.cabal
+++ b/xml-push.cabal
@@ -2,7 +2,7 @@
 cabal-version:	>= 1.8
 
 name:		xml-push
-version:	0.0.0.7
+version:	0.0.0.8
 stability:	Experimenmtal
 author:		Yoshikuni Jujo <PAF01143@nifty.ne.jp>
 maintainer:	Yoshikuni Jujo <PAF01143@nifty.ne.jp>
@@ -100,7 +100,7 @@
 source-repository	this
     type:	git
     location:	git://github.com/YoshikuniJujo/xml-push.git
-    tag:	xml-push-0.0.0.7
+    tag:	xml-push-0.0.0.8
 
 library
     hs-source-dirs:	src