diff options
| author | John MacFarlane <jgm@berkeley.edu> | 2016-01-08 17:33:37 -0800 |
|---|---|---|
| committer | John MacFarlane <jgm@berkeley.edu> | 2016-01-08 17:33:37 -0800 |
| commit | d5f67829dc2d60ba558d9136ab31f0ca74f5339a (patch) | |
| tree | cd47865a30f90e9fdbe171fb292f226cb0ecd45b /tests/Tests | |
| parent | 5884ff6994e739bd46be4914adcb7fc9cc093056 (diff) | |
| download | pandoc-d5f67829dc2d60ba558d9136ab31f0ca74f5339a.tar.gz | |
Added some entity tests in Markdown reader tests.
Diffstat (limited to 'tests/Tests')
| -rw-r--r-- | tests/Tests/Readers/Markdown.hs | 9 |
1 files changed, 9 insertions, 0 deletions
diff --git a/tests/Tests/Readers/Markdown.hs b/tests/Tests/Readers/Markdown.hs index 0661b4642..20602afe1 100644 --- a/tests/Tests/Readers/Markdown.hs +++ b/tests/Tests/Readers/Markdown.hs @@ -371,6 +371,15 @@ tests = [ testGroup "inline code" , plain "b" , plain "c" <> bulletList [plain "d"] ] ] + , testGroup "entities" + [ "character references" =: + "⟨ ö" =?> para (text "\10216 ö") + , "numeric" =: + ",DD" =?> para (text ",DD") + , "in link title" =: + "[link](/url \"title ⟨ ö ,\")" =?> + para (link "/url" "title \10216 ö ," (text "link")) + ] , testGroup "citations" [ "simple" =: "@item1" =?> para (cite [ |