@@ -82,6 +82,7 @@ import qualified Data.Enumerator as E
8282import Data.Enumerator.IO (enumFile)
8383import Blaze.ByteString.Builder (Builder, fromByteString, fromLazyByteString)
8484import Data.Data (Data)
85+import Network.Socket (SockAddr)
8586
8687-- | HTTP request method. Since the HTTP protocol allows arbitrary request
8788-- methods, we leave this open as a 'B.ByteString'. Please note the request
@@ -213,7 +214,7 @@ data Request = Request
213214 -- server-dependant.
214215 , errorHandler :: String -> IO ()
215216 -- | The client\'s host information.
216− , remoteHost :: B.ByteString
217+ , remoteHost :: SockAddr
217218 }
218219 deriving Typeable
219220