diff options
author | John MacFarlane <jgm@berkeley.edu> | 2018-03-17 22:00:55 -0700 |
---|---|---|
committer | John MacFarlane <jgm@berkeley.edu> | 2018-03-17 22:00:55 -0700 |
commit | dfa1dc164a15389e00c86b8d97d71646827a74cf (patch) | |
tree | 882544c7e6e475d2e06988c3fedd54682a20764d /test/Tests/Readers | |
parent | 73f9ba4a008b564ab901efb0bed325e4988df40d (diff) | |
download | pandoc-dfa1dc164a15389e00c86b8d97d71646827a74cf.tar.gz |
hlint fixes.
Diffstat (limited to 'test/Tests/Readers')
-rw-r--r-- | test/Tests/Readers/Muse.hs | 2 | ||||
-rw-r--r-- | test/Tests/Readers/RST.hs | 2 | ||||
-rw-r--r-- | test/Tests/Readers/Txt2Tags.hs | 2 |
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 =" =?> |