From 073db7ac1f79437468702073bfbd97166b48753b Mon Sep 17 00:00:00 2001
From: Alexander Krotov <ilabdsf@gmail.com>
Date: Mon, 18 Feb 2019 15:11:02 +0300
Subject: Move a comment in Muse Writer

---
 src/Text/Pandoc/Writers/Muse.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'src/Text/Pandoc')

diff --git a/src/Text/Pandoc/Writers/Muse.hs b/src/Text/Pandoc/Writers/Muse.hs
index c25b76f65..c09545e85 100644
--- a/src/Text/Pandoc/Writers/Muse.hs
+++ b/src/Text/Pandoc/Writers/Muse.hs
@@ -377,7 +377,6 @@ startsWithMarker f (x:xs) =
     startsWithDot _         = False
 startsWithMarker _ [] = False
 
--- | Escape special characters for Muse if needed.
 containsFootnotes :: String -> Bool
 containsFootnotes = p
   where p ('[':xs) = q xs || p xs
@@ -407,6 +406,7 @@ shouldEscapeString s = do
            ("]" `isInfixOf` s && insideLink) ||
            containsFootnotes s
 
+-- | Escape special characters for Muse if needed.
 conditionalEscapeString :: PandocMonad m
                         => String
                         -> Muse m String
-- 
cgit v1.2.3