From c7d4fd8cf13adb905a8185a7d2fb359e06481184 Mon Sep 17 00:00:00 2001
From: Alexander <ilabdsf@gmail.com>
Date: Wed, 23 Aug 2017 02:34:19 +0300
Subject: Muse reader: do not allow closing tags with EOF (#3863)

This behavior is compatible to Amusewiki
---
 test/Tests/Readers/Muse.hs | 6 ++++++
 1 file changed, 6 insertions(+)

(limited to 'test')

diff --git a/test/Tests/Readers/Muse.hs b/test/Tests/Readers/Muse.hs
index 5a1a635c5..dac980c90 100644
--- a/test/Tests/Readers/Muse.hs
+++ b/test/Tests/Readers/Muse.hs
@@ -54,6 +54,12 @@ tests =
 
       , "Strikeout tag" =: "<del>Strikeout</del>" =?> para (strikeout "Strikeout")
 
+      , "Opening inline tags" =: "foo <em> bar <strong>baz" =?> para "foo <em> bar <strong>baz"
+
+      , "Closing inline tags" =: "foo </em> bar </strong>baz" =?> para "foo </em> bar </strong>baz"
+
+      , "Tag soup" =: "foo <em> bar </strong>baz" =?> para "foo <em> bar </strong>baz"
+
       , "Linebreak" =: "Line <br>  break" =?> para ("Line" <> linebreak <> "break")
 
       , "Code" =: "=foo(bar)=" =?> para (code "foo(bar)")
-- 
cgit v1.2.3