Luke Plant committed 943cbbd

Removed old comments

Comments (0)

Files changed (1)


                      buildResponse) where
--- Mainly borrowed from Network.CGI.Protocol
 import Data.ByteString.Lazy.Char8 (ByteString)
 import qualified Data.ByteString.Lazy.Char8 as BS
 import Data.List
                          headers = [(contentTypeName, htmlContent charset)]
-utf8HtmlResponse should probably accept Html as an argument and return
-the full Response, rather than returning an empty Response.
-Need to think more about constructors for Responses and how the API
-should work.
 -- | Create an empty response for sending HTML, UTF-8 encoding
 utf8HtmlResponse = htmlResponse "UTF-8"