Fixed error when rendering literate Haskell.

Literate haskell was not listed in the pattern matching on
FileType's, so it gave an error that the file type could not be
rendered. This was quickly resolved by adding it to the list.

1 files changed, 5 insertions, 4 deletions

diff --git a/src/Text/Hakyll/Internal/Page.hs b/src/Text/Hakyll/Internal/Page.hs
index 8f1b9d6..0ba8983 100644
--- a/src/Text/Hakyll/Internal/Page.hs
+++ b/src/Text/Hakyll/Internal/Page.hs
@@ -42,10 +42,11 @@ getRenderFunction Text     = id
 getRenderFunction fileType = writeHtmlString writerOptions
                            . readFunction fileType (readOptions fileType)
   where
-    readFunction ReStructuredText = readRST
-    readFunction LaTeX            = readLaTeX
-    readFunction Markdown         = readMarkdown
-    readFunction t                = error $ "Cannot render file " ++ show t
+    readFunction ReStructuredText        = readRST
+    readFunction LaTeX                   = readLaTeX
+    readFunction Markdown                = readMarkdown
+    readFunction LiterateHaskellMarkdown = readMarkdown
+    readFunction t                       = error $ "Cannot render " ++ show t
 
     readOptions LiterateHaskellMarkdown =
         readerOptions { stateLiterateHaskell = True }