aboutsummaryrefslogtreecommitdiff
path: root/test/Tests/Readers
diff options
context:
space:
mode:
authorJohn MacFarlane <jgm@berkeley.edu>2018-03-17 22:00:55 -0700
committerJohn MacFarlane <jgm@berkeley.edu>2018-03-17 22:00:55 -0700
commitdfa1dc164a15389e00c86b8d97d71646827a74cf (patch)
tree882544c7e6e475d2e06988c3fedd54682a20764d /test/Tests/Readers
parent73f9ba4a008b564ab901efb0bed325e4988df40d (diff)
downloadpandoc-dfa1dc164a15389e00c86b8d97d71646827a74cf.tar.gz
hlint fixes.
Diffstat (limited to 'test/Tests/Readers')
-rw-r--r--test/Tests/Readers/Muse.hs2
-rw-r--r--test/Tests/Readers/RST.hs2
-rw-r--r--test/Tests/Readers/Txt2Tags.hs2
3 files changed, 3 insertions, 3 deletions
diff --git a/test/Tests/Readers/Muse.hs b/test/Tests/Readers/Muse.hs
index 7cb220f03..89dbbc345 100644
--- a/test/Tests/Readers/Muse.hs
+++ b/test/Tests/Readers/Muse.hs
@@ -175,7 +175,7 @@ tests =
, "Class tag without name" =: "<class>foobar</class>" =?> para (spanWith ("", [], []) "foobar")
-- <em> tag should match with the last </em> tag, not verbatim one
- , "Nested \"</em>\" inside em tag" =: "<em>foo<verbatim></em></verbatim>bar</em>" =?> para (emph ("foo</em>bar"))
+ , "Nested \"</em>\" inside em tag" =: "<em>foo<verbatim></em></verbatim>bar</em>" =?> para (emph "foo</em>bar")
, testGroup "Links"
[ "Link without description" =:
diff --git a/test/Tests/Readers/RST.hs b/test/Tests/Readers/RST.hs
index 3753fbf12..305c7060b 100644
--- a/test/Tests/Readers/RST.hs
+++ b/test/Tests/Readers/RST.hs
@@ -184,6 +184,6 @@ tests = [ "line block with blank line" =:
, ".. [1]"
, " bar"
] =?>
- para ("foo" <> (note $ para "bar"))
+ para ("foo" <> note (para "bar"))
]
]
diff --git a/test/Tests/Readers/Txt2Tags.hs b/test/Tests/Readers/Txt2Tags.hs
index 435d983a1..e3646e95e 100644
--- a/test/Tests/Readers/Txt2Tags.hs
+++ b/test/Tests/Readers/Txt2Tags.hs
@@ -143,7 +143,7 @@ tests =
, "Header with label" =:
"= header =[label]" =?>
- headerWith ("label", [], []) 1 ("header")
+ headerWith ("label", [], []) 1 "header"
, "Invalid header, mismatched delimiters" =:
"== header =" =?>