diff options
author | John MacFarlane <jgm@berkeley.edu> | 2011-01-14 22:38:02 -0800 |
---|---|---|
committer | John MacFarlane <jgm@berkeley.edu> | 2011-01-14 22:38:02 -0800 |
commit | fd794178251174f9519b04ef92f62e87df0320f0 (patch) | |
tree | f42c7c56f4b49562cf0db221a4ddb1967aa42d21 /src/Text/Pandoc.hs | |
parent | 458aec23950edc293bada01e653ae37ce11bda35 (diff) | |
download | pandoc-fd794178251174f9519b04ef92f62e87df0320f0.tar.gz |
Fixed the parser for rst+lhs - set stateLiterateHaskell.
Diffstat (limited to 'src/Text/Pandoc.hs')
-rw-r--r-- | src/Text/Pandoc.hs | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/src/Text/Pandoc.hs b/src/Text/Pandoc.hs index 3532c1d4b..dd1b3892d 100644 --- a/src/Text/Pandoc.hs +++ b/src/Text/Pandoc.hs @@ -149,8 +149,9 @@ readers = [("native" , \_ -> read) ,("markdown+lhs" , \st -> readMarkdown st{ stateLiterateHaskell = True}) ,("rst" , readRST) + ,("rst+lhs" , \st -> + readRST st{ stateLiterateHaskell = True}) ,("textile" , readTextile) -- TODO : textile+lhs - ,("rst+lhs" , readRST) ,("html" , readHtml) ,("latex" , readLaTeX) ,("latex+lhs" , \st -> |