diff options
| author | Jasper Van der Jeugt <jaspervdj@gmail.com> | 2010-03-10 19:47:53 +0100 |
|---|---|---|
| committer | Jasper Van der Jeugt <jaspervdj@gmail.com> | 2010-03-10 19:47:53 +0100 |
| commit | 35e824648499d868b2c37b41ecc8f847f452917b (patch) | |
| tree | afe1194fc88249b2a0a04714bda051fa21170002 /src/Network | |
| parent | 23f9d1e0cfb82260b73ce8799756fa6d3a838a70 (diff) | |
| download | hakyll-35e824648499d868b2c37b41ecc8f847f452917b.tar.gz | |
Merged Text.Hakyll.Internal.Render into Text.Hakyll.Render.
Diffstat (limited to 'src/Network')
| -rw-r--r-- | src/Network/Hakyll/SimpleServer.hs | 20 |
1 files changed, 10 insertions, 10 deletions
diff --git a/src/Network/Hakyll/SimpleServer.hs b/src/Network/Hakyll/SimpleServer.hs index 6258e35..4b4e7ee 100644 --- a/src/Network/Hakyll/SimpleServer.hs +++ b/src/Network/Hakyll/SimpleServer.hs @@ -143,16 +143,16 @@ getMIMEHeader fileName = Nothing -> [] where result = lookup (takeExtension fileName) [ (".css", "text/css") - , (".gif", "image/gif") - , (".htm", "text/html") - , (".html", "text/html") - , (".jpeg", "image/jpeg") - , (".jpg", "image/jpeg") - , (".js", "text/javascript") - , (".png", "image/png") - , (".txt", "text/plain") - , (".xml", "text/xml") - ] + , (".gif", "image/gif") + , (".htm", "text/html") + , (".html", "text/html") + , (".jpeg", "image/jpeg") + , (".jpg", "image/jpeg") + , (".js", "text/javascript") + , (".png", "image/png") + , (".txt", "text/plain") + , (".xml", "text/xml") + ] -- | Respond to an incoming request. respond :: Handle -> Server () |