LaTeX writer: Test for protecting images in header.

2014-09-09 11:05:47 -04:00 · 2014-09-09 11:05:47 -04:00 · 8d22bf26ab
commit 8d22bf26ab
parent 1326a41780
1 changed files with 3 additions and 0 deletions
--- a/tests/Tests/Writers/LaTeX.hs
+++ b/tests/Tests/Writers/LaTeX.hs
@ -60,6 +60,9 @@ tests = [ testGroup "code blocks"
            definitionList [(text "foo", [header 2 (text "bar"),
                                          para $ text "baz"])] =?>
            "\\begin{description}\n\\item[foo] ~ \n\\subsection{bar}\n\nbaz\n\\end{description}"
+          , "containing image" =:
+            header 1 (image "imgs/foo.jpg" "" (text "Alt text")) =?>
+            "\\section{\\protect\\includegraphics{imgs/foo.jpg}}"
          ]
        , testGroup "inline code"
          [ "struck out and highlighted" =: