diff options
author | John MacFarlane <jgm@berkeley.edu> | 2017-03-14 17:05:36 +0100 |
---|---|---|
committer | John MacFarlane <jgm@berkeley.edu> | 2017-03-14 17:07:23 +0100 |
commit | 6ecc5b96a9854382682fd1c9231133c08dae7b17 (patch) | |
tree | 3703f769c52b951a6233a3b92736b84cc47700ed /test/Tests/Readers/LaTeX.hs | |
parent | 0b4ae3af662587a69e6893b7f6c347d90912c48f (diff) | |
download | pandoc-6ecc5b96a9854382682fd1c9231133c08dae7b17.tar.gz |
Use tasty for tests rather than test-framework.
Diffstat (limited to 'test/Tests/Readers/LaTeX.hs')
-rw-r--r-- | test/Tests/Readers/LaTeX.hs | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/test/Tests/Readers/LaTeX.hs b/test/Tests/Readers/LaTeX.hs index 423735243..75547ed6b 100644 --- a/test/Tests/Readers/LaTeX.hs +++ b/test/Tests/Readers/LaTeX.hs @@ -1,7 +1,7 @@ {-# LANGUAGE OverloadedStrings #-} module Tests.Readers.LaTeX (tests) where -import Test.Framework +import Test.Tasty import Tests.Helpers import Text.Pandoc import Text.Pandoc.Arbitrary () @@ -13,14 +13,14 @@ latex = purely $ readLaTeX def{ infix 4 =: (=:) :: ToString c - => String -> (String, c) -> Test + => String -> (String, c) -> TestTree (=:) = test latex simpleTable' :: [Alignment] -> [[Blocks]] -> Blocks simpleTable' aligns = table "" (zip aligns (repeat 0.0)) (map (const mempty) aligns) -tests :: [Test] +tests :: [TestTree] tests = [ testGroup "basic" [ "simple" =: "word" =?> para "word" @@ -128,7 +128,7 @@ baseCitation = Citation{ citationId = "item1" rt :: String -> Inlines rt = rawInline "latex" -natbibCitations :: Test +natbibCitations :: TestTree natbibCitations = testGroup "natbib" [ "citet" =: "\\citet{item1}" =?> para (cite [baseCitation] (rt "\\citet{item1}")) @@ -175,7 +175,7 @@ natbibCitations = testGroup "natbib" Strong [Str "32"]] }] (rt "\\citep[\\emph{see}][p. \\textbf{32}]{item1}")) ] -biblatexCitations :: Test +biblatexCitations :: TestTree biblatexCitations = testGroup "biblatex" [ "textcite" =: "\\textcite{item1}" =?> para (cite [baseCitation] (rt "\\textcite{item1}")) |