From a16382b06b860e2d4a7284527b6fda0167cffa61 Mon Sep 17 00:00:00 2001
From: Alexander Krotov <ilabdsf@gmail.com>
Date: Tue, 20 Feb 2018 14:37:02 +0300
Subject: Muse reader: use updateState instead of setState to restore
 museInLink

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

(limited to 'src/Text')

diff --git a/src/Text/Pandoc/Readers/Muse.hs b/src/Text/Pandoc/Readers/Muse.hs
index 2f20de1c9..b9f233a1f 100644
--- a/src/Text/Pandoc/Readers/Muse.hs
+++ b/src/Text/Pandoc/Readers/Muse.hs
@@ -912,7 +912,7 @@ link = try $ do
   guard $ not $ museInLink st
   setState $ st{ museInLink = True }
   (url, title, content) <- linkText
-  setState $ st{ museInLink = False }
+  updateState (\st -> st { museInLink = False })
   return $ case stripPrefix "URL:" url of
              Nothing -> if isImageUrl url
                           then B.image url title <$> fromMaybe (return mempty) content
-- 
cgit v1.2.3