diff options
| -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 [ |