@@ -90,6 +90,8 @@ module Network.Wai.Handler.Warp (
9090 , pauseTimeout
9191 , FileInfo(..)
9292 , getFileInfo
93+ -- * Version
94+ , warpVersion
9395 ) where
9496
9597import Control.Exception (SomeException, throwIO)
@@ -102,6 +104,7 @@ import Network.Socket (SockAddr)
102104import Network.Wai (Request, Response, vault)
103105import Network.Wai.Handler.Warp.FileInfoCache
104106import Network.Wai.Handler.Warp.Request
107+import Network.Wai.Handler.Warp.Response (warpVersion)
105108import Network.Wai.Handler.Warp.Run
106109import Network.Wai.Handler.Warp.Settings
107110import Network.Wai.Handler.Warp.Timeout