diff --git a/ChangeLog.md b/ChangeLog.md
--- a/ChangeLog.md
+++ b/ChangeLog.md
@@ -1,5 +1,9 @@
 # ChangeLog
 
+## 3.4.1
+
+* Supporting `tls` v1.8.0.
+
 ## 3.4.0
 
 * Major version up to deprecate v3.3.7 due to the incompatibility
diff --git a/Network/Wai/Handler/WarpTLS.hs b/Network/Wai/Handler/WarpTLS.hs
--- a/Network/Wai/Handler/WarpTLS.hs
+++ b/Network/Wai/Handler/WarpTLS.hs
@@ -335,7 +335,11 @@
         recv = handle onEOF $ TLS.recvData ctx
           where
             onEOF e
+#if MIN_VERSION_tls(1,8,0)
+              | Just (TLS.PostHandshake TLS.Error_EOF) <- E.fromException e = return S.empty
+#else
               | Just TLS.Error_EOF <- fromException e       = return S.empty
+#endif
               | Just ioe <- fromException e, isEOFError ioe = return S.empty                  | otherwise                                   = throwIO e
         sendfile fid offset len hook headers = do
             writeBuffer <- I.readIORef writeBufferRef
diff --git a/warp-tls.cabal b/warp-tls.cabal
--- a/warp-tls.cabal
+++ b/warp-tls.cabal
@@ -1,5 +1,5 @@
 Name:                warp-tls
-Version:             3.4.0
+Version:             3.4.1
 Synopsis:            HTTP over TLS support for Warp via the TLS package
 License:             MIT
 License-file:        LICENSE