aboutsummaryrefslogtreecommitdiff
path: root/src/Text/Pandoc/Readers/Muse.hs
diff options
context:
space:
mode:
Diffstat (limited to 'src/Text/Pandoc/Readers/Muse.hs')
-rw-r--r--src/Text/Pandoc/Readers/Muse.hs3
1 files changed, 1 insertions, 2 deletions
diff --git a/src/Text/Pandoc/Readers/Muse.hs b/src/Text/Pandoc/Readers/Muse.hs
index b7a1ce7ad..104fa914f 100644
--- a/src/Text/Pandoc/Readers/Muse.hs
+++ b/src/Text/Pandoc/Readers/Muse.hs
@@ -807,8 +807,7 @@ emphasisBetween p = try $ trimInlinesF . mconcat
<$ atStart
<* p
<* notFollowedBy space
- <*> many1Till inline (try $ noSpaceBefore *> p)
- <* notFollowedBy alphaNum
+ <*> many1Till inline (try $ noSpaceBefore *> p <* notFollowedBy alphaNum)
-- | Parse an inline tag, such as @\<em>@ and @\<strong>@.
inlineTag :: PandocMonad m