diff options
author | John MacFarlane <fiddlosopher@gmail.com> | 2011-12-13 14:29:07 -0800 |
---|---|---|
committer | John MacFarlane <fiddlosopher@gmail.com> | 2011-12-13 14:29:07 -0800 |
commit | 78816497f3d1691daf5c1a43f9bd8b8908f6f312 (patch) | |
tree | 7b2fc53ed32939bd3168a5c7d44067c8cfa4f83c /src/Tests/Writers | |
parent | bab0c333a09636eab7c0a6c572fcbd38ee5a1272 (diff) |
Use pandoc-types 1.9.*.
Diffstat (limited to 'src/Tests/Writers')
-rw-r--r-- | src/Tests/Writers/HTML.hs | 2 | ||||
-rw-r--r-- | src/Tests/Writers/Markdown.hs | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/src/Tests/Writers/HTML.hs b/src/Tests/Writers/HTML.hs index 3e1e0ddc2..e3a446586 100644 --- a/src/Tests/Writers/HTML.hs +++ b/src/Tests/Writers/HTML.hs @@ -40,7 +40,7 @@ tests = [ testGroup "inline code" ] , testGroup "images" [ "alt with formatting" =: - image "/url" "title" ("my " +++ emph "image") + image "/url" "title" ("my " <> emph "image") =?> "<img src=\"/url\" title=\"title\" alt=\"my image\" />" ] ] diff --git a/src/Tests/Writers/Markdown.hs b/src/Tests/Writers/Markdown.hs index 70266a683..17bf784ca 100644 --- a/src/Tests/Writers/Markdown.hs +++ b/src/Tests/Writers/Markdown.hs @@ -29,6 +29,6 @@ infix 5 =: tests :: [Test] tests = [ "indented code after list" - =: (orderedList [ para "one" +++ para "two" ] +++ codeBlock "test") + =: (orderedList [ para "one" <> para "two" ] <> codeBlock "test") =?> "1. one\n\n two\n\n<!-- -->\n\n test" ] |