diff options
Diffstat (limited to 'tests/Tests/Writers/HTML.hs')
-rw-r--r-- | tests/Tests/Writers/HTML.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/tests/Tests/Writers/HTML.hs b/tests/Tests/Writers/HTML.hs index 5bea99f71..0ce9aecb3 100644 --- a/tests/Tests/Writers/HTML.hs +++ b/tests/Tests/Writers/HTML.hs @@ -8,7 +8,7 @@ import Tests.Helpers import Text.Pandoc.Arbitrary() html :: (ToPandoc a) => a -> String -html = writeHtmlString def{ writerWrapText = WrapNone } . toPandoc +html = purely (writeHtmlString def{ writerWrapText = WrapNone }) . toPandoc {- "my test" =: X =?> Y |