happstack-server-7.4.4: Web related tools and services.

Safe HaskellNone
LanguageHaskell98

Happstack.Server.Compression

Description

Filter for compressing the Response body.

Synopsis

Documentation

compressedResponseFilter Source

Arguments

:: (FilterMonad Response m, MonadPlus m, WebMonad Response m, ServerMonad m) 
=> m String

name of the encoding chosen

reads the Accept-Encoding header. Then, if possible will compress the response body with methods gzip or deflate.

main =
  simpleHTTP nullConf $
     do str <- compressedResponseFilter
        return $ toResponse ("This response compressed using: " ++ str)