aboutsummaryrefslogtreecommitdiff
path: root/test
diff options
context:
space:
mode:
authorJohn MacFarlane <jgm@berkeley.edu>2018-10-19 14:59:11 -0700
committerJohn MacFarlane <jgm@berkeley.edu>2018-10-19 14:59:11 -0700
commite6772360f661c50eea2f83dc4110185da3ad0f74 (patch)
tree7974333df5aef16f422c40745f61d41efc2efe93 /test
parent2ee9cdcc6048d3cb244ca4b63250936328abe0a7 (diff)
downloadpandoc-e6772360f661c50eea2f83dc4110185da3ad0f74.tar.gz
More man reader test updates.
Diffstat (limited to 'test')
-rw-r--r--test/Tests/Readers/Man.hs12
1 files changed, 6 insertions, 6 deletions
diff --git a/test/Tests/Readers/Man.hs b/test/Tests/Readers/Man.hs
index 22e0cbaf7..f784596f3 100644
--- a/test/Tests/Readers/Man.hs
+++ b/test/Tests/Readers/Man.hs
@@ -30,16 +30,16 @@ tests = [
=?> (para $ emph "bar")
, "BoldItalic" =:
".BI foo bar"
- =?> (para $ strong $ emph $ str "foo bar")
+ =?> (para $ strong $ emph $ text "foo bar")
, "H1" =:
".SH The header\n"
- =?> header 2 (str "The" <> space <> str "header")
+ =?> header 2 (text "The header")
, "H2" =:
".SS \"The header 2\""
- =?> header 3 (str "The header 2")
+ =?> header 3 (text "The header 2")
, "Macro args" =:
".B \"single arg with \"\"Q\"\"\""
- =?> (para $ strong $ str "single arg with \"Q\"")
+ =?> (para $ strong $ text "single arg with \"Q\"")
, "comment" =:
".\\\"bla\naaa"
=?> (para $ space <> str "aaa")
@@ -56,10 +56,10 @@ tests = [
=?> (para $ str "ab")
, "replace" =:
"\\-\\ \\\\\\[lq]\\[rq]\\[em]\\[en]\\*(lq\\*(rq"
- =?> (para $ str "- \\“”—–“”")
+ =?> (para $ text "- \\“”—–“”")
, "replace2" =:
"\\t\\e\\`\\^\\|\\'"
- =?> (para $ str "\t\\` `")
+ =?> (para $ text "\t\\` `")
],
testGroup "Lists" [
"bullet" =: