$ do writeHeader ni "Content-Type" $ Just defaultPageContentType
writeHeader ni "Content-Encoding" Nothing
res ← readTVar niResponse
$ do writeHeader ni "Content-Type" $ Just defaultPageContentType
writeHeader ni "Content-Encoding" Nothing
res ← readTVar niResponse