From 13e0ac1104cc77f15e85fea83f54b6d6ae65271d Mon Sep 17 00:00:00 2001
From: Alexander Krotov <ilabdsf@gmail.com>
Date: Tue, 15 Oct 2019 00:56:28 +0300
Subject: Muse reader: do not terminate emphasis on "*" not followed by space

---
 test/Tests/Readers/Muse.hs | 4 ++++
 1 file changed, 4 insertions(+)

(limited to 'test')

diff --git a/test/Tests/Readers/Muse.hs b/test/Tests/Readers/Muse.hs
index 0ca94de98..6a9919233 100644
--- a/test/Tests/Readers/Muse.hs
+++ b/test/Tests/Readers/Muse.hs
@@ -133,6 +133,10 @@ tests =
         "**foo *bar* baz**" =?>
         para (strong (text "foo " <> emph (text "bar") <> text " baz"))
 
+      , "Asterisk between words does not terminate emphasis" =:
+        "*foo*bar*" =?>
+        para (emph $ "foo*bar")
+
       , test emacsMuse "Underline"
         ("_Underline_" =?> para (underlineSpan "Underline"))
 
-- 
cgit v1.2.3