diff --git a/ChangeLog.md b/ChangeLog.md
--- a/ChangeLog.md
+++ b/ChangeLog.md
@@ -1,6 +1,10 @@
 # ChangeLog
 
-## 3.4.1
+## 3.4.3
+
+* Install shutdown handlers passed via `Settings` to `run...` functions
+
+## 3.4.2
 
 * Requiring warp v3.3.29.
 
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
@@ -223,6 +223,7 @@
 --   specified 'Socket'.
 runTLSSocket :: TLSSettings -> Settings -> Socket -> Application -> IO ()
 runTLSSocket tlsset set sock app = do
+    settingsInstallShutdownHandler set (close sock)
     credentials <- loadCredentials tlsset
     mgr <- getSessionManager tlsset
     runTLSSocket' tlsset set credentials mgr sock app
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.2
+Version:             3.4.3
 Synopsis:            HTTP over TLS support for Warp via the TLS package
 License:             MIT
 License-file:        LICENSE