aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorJohn MacFarlane <fiddlosopher@gmail.com>2011-12-01 19:47:25 -0800
committerJohn MacFarlane <fiddlosopher@gmail.com>2011-12-01 19:47:25 -0800
commit7a09873a0b792be381d26b17a6833a163ce294b8 (patch)
treea15af5f849992de7890025087ff8b7973b577796
parent8137f07cea168e6c5060912ecd044ef58b92ef22 (diff)
downloadpandoc-7a09873a0b792be381d26b17a6833a163ce294b8.tar.gz
Added failing test case for issue #312.
-rw-r--r--src/Tests/Readers/Markdown.hs5
1 files changed, 5 insertions, 0 deletions
diff --git a/src/Tests/Readers/Markdown.hs b/src/Tests/Readers/Markdown.hs
index 941762bd0..585965db5 100644
--- a/src/Tests/Readers/Markdown.hs
+++ b/src/Tests/Readers/Markdown.hs
@@ -44,6 +44,11 @@ tests = [ testGroup "inline code"
"`*` {.haskell .special x=\"7\"}"
=?> para (codeWith ("",["haskell","special"],[("x","7")]) "*")
]
+ , testGroup "backslash escapes"
+ [ "in URL" =:
+ "[hi](/there\\))"
+ =?> para (link "hi" "/there)" "")
+ ]
, testGroup "smart punctuation"
[ test markdownSmart "quote before ellipses"
("'...hi'"