From d5f67829dc2d60ba558d9136ab31f0ca74f5339a Mon Sep 17 00:00:00 2001
From: John MacFarlane <jgm@berkeley.edu>
Date: Fri, 8 Jan 2016 17:33:37 -0800
Subject: Added some entity tests in Markdown reader tests.

---
 tests/Tests/Readers/Markdown.hs | 9 +++++++++
 1 file changed, 9 insertions(+)

(limited to 'tests/Tests')

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" =:
+            "&lang; &ouml;" =?> para (text "\10216 ö")
+          , "numeric" =:
+            "&#44;&#x44;&#X44;" =?> para (text ",DD")
+          , "in link title" =:
+            "[link](/url \"title &lang; &ouml; &#44;\")" =?>
+               para (link "/url" "title \10216 ö ," (text "link"))
+          ]
         , testGroup "citations"
           [ "simple" =:
             "@item1" =?> para (cite [
-- 
cgit v1.2.3