summaryrefslogtreecommitdiff
path: root/src/Tests/Readers/Markdown.hs
diff options
context:
space:
mode:
Diffstat (limited to 'src/Tests/Readers/Markdown.hs')
-rw-r--r--src/Tests/Readers/Markdown.hs3
1 files changed, 2 insertions, 1 deletions
diff --git a/src/Tests/Readers/Markdown.hs b/src/Tests/Readers/Markdown.hs
index e6612f475..ca7dc457b 100644
--- a/src/Tests/Readers/Markdown.hs
+++ b/src/Tests/Readers/Markdown.hs
@@ -93,7 +93,8 @@ tests = [ testGroup "inline code"
=?> para (note (para "See [^1]"))
]
, testGroup "lhs"
- [ test (readMarkdown defaultParserState{stateLiterateHaskell = True})
+ [ test (readMarkdown def{stateOptions =
+ def{readerLiterateHaskell = True}})
"inverse bird tracks and html" $
"> a\n\n< b\n\n<div>\n"
=?> codeBlockWith ("",["sourceCode","literate","haskell"],[]) "a"