diff options
author | John MacFarlane <fiddlosopher@gmail.com> | 2013-01-23 08:47:43 -0800 |
---|---|---|
committer | John MacFarlane <fiddlosopher@gmail.com> | 2013-01-23 19:26:39 -0800 |
commit | daeb52d4e0f21b0e1ad8c3ce17ee9f18a6394f63 (patch) | |
tree | 40a9791fdff806ce599635bd0c5d5fbfb54f8cdc /tests/Tests/Writers/ConTeXt.hs | |
parent | 9c299d282f943fd4db076b09b1901309e19308bd (diff) | |
download | pandoc-daeb52d4e0f21b0e1ad8c3ce17ee9f18a6394f63.tar.gz |
Eliminated use of TH in test suite.
Diffstat (limited to 'tests/Tests/Writers/ConTeXt.hs')
-rw-r--r-- | tests/Tests/Writers/ConTeXt.hs | 36 |
1 files changed, 18 insertions, 18 deletions
diff --git a/tests/Tests/Writers/ConTeXt.hs b/tests/Tests/Writers/ConTeXt.hs index 1beed33bb..8f0305adb 100644 --- a/tests/Tests/Writers/ConTeXt.hs +++ b/tests/Tests/Writers/ConTeXt.hs @@ -1,4 +1,4 @@ -{-# LANGUAGE OverloadedStrings, QuasiQuotes #-} +{-# LANGUAGE OverloadedStrings #-} module Tests.Writers.ConTeXt (tests) where import Test.Framework @@ -48,23 +48,23 @@ tests = [ testGroup "inline code" [ "nested" =: bulletList [ plain (text "top") - <> bulletList [ - plain (text "next") - <> bulletList [plain (text "bot")] - ] - ] =?> [_LIT| -\startitemize[packed] -\item - top - \startitemize[packed] - \item - next - \startitemize[packed] - \item - bot - \stopitemize - \stopitemize -\stopitemize|] + <> bulletList [ + plain (text "next") + <> bulletList [plain (text "bot")] + ] + ] =?> unlines + [ "\\startitemize[packed]" + , "\\item" + , " top" + , " \\startitemize[packed]" + , " \\item" + , " next" + , " \\startitemize[packed]" + , " \\item" + , " bot" + , " \\stopitemize" + , " \\stopitemize" + , "\\stopitemize" ] ] ] |