diff options
| author | John MacFarlane <jgm@berkeley.edu> | 2013-11-22 19:41:08 -0800 |
|---|---|---|
| committer | John MacFarlane <jgm@berkeley.edu> | 2013-11-22 19:41:08 -0800 |
| commit | cf149fcf38d98b1bee79ecd9056fa0f46264e7ce (patch) | |
| tree | f8e100ecd0f61f13039498676afcf0cca2fd7247 /tests | |
| parent | 3d453f096cfa12e231c5a4d4c8e468378e20e5e8 (diff) | |
| download | pandoc-cf149fcf38d98b1bee79ecd9056fa0f46264e7ce.tar.gz | |
Fixed bug with intraword emphasis.
Closes #1066.
Diffstat (limited to 'tests')
| -rw-r--r-- | tests/Tests/Readers/Markdown.hs | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/tests/Tests/Readers/Markdown.hs b/tests/Tests/Readers/Markdown.hs index ccca147ab..b04ff9a0d 100644 --- a/tests/Tests/Readers/Markdown.hs +++ b/tests/Tests/Readers/Markdown.hs @@ -136,6 +136,11 @@ tests = [ testGroup "inline code" "`*` {.haskell .special x=\"7\"}" =?> para (codeWith ("",["haskell","special"],[("x","7")]) "*") ] + , testGroup "emph and strong" + [ "two strongs in emph" =: + "***a**b **c**d*" =?> para (emph (strong (str "a") <> str "b" <> space + <> strong (str "c") <> str "d")) + ] , testGroup "raw LaTeX" [ "in URL" =: "\\begin\n" =?> para (text "\\begin") |