diff options
| author | John MacFarlane <jgm@berkeley.edu> | 2013-09-12 11:23:34 -0700 |
|---|---|---|
| committer | John MacFarlane <jgm@berkeley.edu> | 2013-09-12 11:23:57 -0700 |
| commit | 37471041788f079632ec369a970a184864799c3d (patch) | |
| tree | 6b590834c97b1cd2f07cedea0c1e9c6363c0accd /src/Text/Pandoc | |
| parent | ca6842349e23b3f60cb2665d1c20de9951bea268 (diff) | |
| download | pandoc-37471041788f079632ec369a970a184864799c3d.tar.gz | |
Markdown writer: Print references if output is 'plain'.
Diffstat (limited to 'src/Text/Pandoc')
| -rw-r--r-- | src/Text/Pandoc/Writers/Markdown.hs | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Writers/Markdown.hs b/src/Text/Pandoc/Writers/Markdown.hs index 23e730bf0..a36bb8e14 100644 --- a/src/Text/Pandoc/Writers/Markdown.hs +++ b/src/Text/Pandoc/Writers/Markdown.hs @@ -189,7 +189,8 @@ pandocToMarkdown opts (Pandoc meta blocks) = do -- Strip off final 'references' header if markdown citations enabled let blocks' = case reverse blocks of (Div (_,["references"],_) _):xs - | isEnabled Ext_citations opts -> reverse xs + | not isPlain && isEnabled Ext_citations opts + -> reverse xs _ -> blocks body <- blockListToMarkdown opts blocks' st <- get |