@@ -53,6 +53,13 @@ tests = [ testGroup "code blocks"
53 headerWith ("foo",["unnumbered"],[]) 1
53 headerWith ("foo",["unnumbered"],[]) 1
54 (text "Header 1" <> note (plain $ text "note")) =?>
54 (text "Header 1" <> note (plain $ text "note")) =?>
55 "\\section*{Header 1\\footnote{note}}\\label{foo}\n\\addcontentsline{toc}{section}{Header 1}\n"
55 "\\section*{Header 1\\footnote{note}}\\label{foo}\n\\addcontentsline{toc}{section}{Header 1}\n"
57+ bulletList [header 2 (text "foo")] =?>
58+ "\\begin{itemize}\n\\item ~\n \\subsection{foo}\n\\end{itemize}"
59+ , "in definition list item" =:
60+ definitionList [(text "foo", [header 2 (text "bar"),
61+ para $ text "baz"])] =?>
62+ "\\begin{description}\n\\item[foo] ~ \n\\subsection{bar}\n\nbaz\n\\end{description}"
57 , testGroup "inline code"
64 , testGroup "inline code"
58 [ "struck out and highlighted" =:
65 [ "struck out and highlighted" =: