diff --git a/Data/Conduit/Network/TLS.hs b/Data/Conduit/Network/TLS.hs
--- a/Data/Conduit/Network/TLS.hs
+++ b/Data/Conduit/Network/TLS.hs
@@ -128,7 +128,7 @@
           app' socket addr mlocal = do
             ctx <- serverHandshake socket creds
             app (tlsAppData ctx addr mlocal)
-
+            TLS.bye ctx
 
 type ApplicationStartTLS = (AppData, (AppData -> IO ()) -> IO ()) -> IO ()
 
@@ -165,6 +165,7 @@
                 startTls = \app' -> do
                   ctx <- serverHandshake socket creds
                   app' (tlsAppData ctx addr mlocal)
+                  TLS.bye ctx
                 in
                  app (clearData, startTls)
 
diff --git a/network-conduit-tls.cabal b/network-conduit-tls.cabal
--- a/network-conduit-tls.cabal
+++ b/network-conduit-tls.cabal
@@ -1,5 +1,5 @@
 name:                network-conduit-tls
-version:             1.1.0
+version:             1.1.0.1
 synopsis:            Create TLS-aware network code with conduits
 description:         Uses the tls package for a pure-Haskell implementation.
 homepage:            https://github.com/snoyberg/conduit