aboutsummaryrefslogtreecommitdiff
path: root/tests/Tests/Writers
diff options
context:
space:
mode:
authorJohn MacFarlane <fiddlosopher@gmail.com>2013-08-16 13:02:55 -0700
committerJohn MacFarlane <fiddlosopher@gmail.com>2013-08-16 13:03:38 -0700
commit441a7aebf8c141612203d1cab0032f8c55e536ed (patch)
treeb991c5babcb42425145ed73210c39a0a025e46dc /tests/Tests/Writers
parentab8c0dcd410282baaa9429f755ad55e6d01a2466 (diff)
downloadpandoc-441a7aebf8c141612203d1cab0032f8c55e536ed.tar.gz
LaTeX writer: Avoid problem with footnotes in unnumbered headers.
Closes #940. Added test case.
Diffstat (limited to 'tests/Tests/Writers')
-rw-r--r--tests/Tests/Writers/LaTeX.hs6
1 files changed, 6 insertions, 0 deletions
diff --git a/tests/Tests/Writers/LaTeX.hs b/tests/Tests/Writers/LaTeX.hs
index b1427d91f..ebde5b97c 100644
--- a/tests/Tests/Writers/LaTeX.hs
+++ b/tests/Tests/Writers/LaTeX.hs
@@ -36,4 +36,10 @@ tests = [ testGroup "code blocks"
[ "escape |" =: para (math "\\sigma|_{\\{x\\}}") =?>
"$\\sigma|_{\\{x\\}}$"
]
+ , testGroup "headers"
+ [ "unnumbered header" =:
+ headerWith ("foo",["unnumbered"],[]) 1
+ (text "Header 1" <> note (plain $ text "note")) =?>
+ "\\section*{Header 1\\footnote{note}}\\label{foo}\n\\addcontentsline{toc}{section}{Header 1}\n"
+ ]
]