aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorNikolay Yakimov <root@livid.pp.ru>2015-04-18 00:53:20 +0300
committerNikolay Yakimov <root@livid.pp.ru>2015-04-18 00:53:20 +0300
commit94e4a5ec44ea3ac53a5cd69479ba716862f86c07 (patch)
tree279eccc0cb4c6bc34e15e5f5aa52c68a0fba734c
parent2cd08b47e099908bd549df55afc2c4308f7c0478 (diff)
downloadpandoc-94e4a5ec44ea3ac53a5cd69479ba716862f86c07.tar.gz
MD Reader: Test for smart `'` after inline math
-rw-r--r--tests/Tests/Readers/Markdown.hs3
1 files changed, 3 insertions, 0 deletions
diff --git a/tests/Tests/Readers/Markdown.hs b/tests/Tests/Readers/Markdown.hs
index 03884a8e5..6c8e9f306 100644
--- a/tests/Tests/Readers/Markdown.hs
+++ b/tests/Tests/Readers/Markdown.hs
@@ -208,6 +208,9 @@ tests = [ testGroup "inline code"
, test markdownSmart "apostrophe in French"
("À l'arrivée de la guerre, le thème de l'«impossibilité du socialisme»"
=?> para "À l’arrivée de la guerre, le thème de l’«impossibilité du socialisme»")
+ , test markdownSmart "apostrophe after math" $ -- issue #1909
+ "The value of the $x$'s and the systems' condition." =?>
+ para (text "The value of the " <> math "x" <> text "\8217s and the systems\8217 condition.")
]
, testGroup "footnotes"
[ "indent followed by newline and flush-left text" =: