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')
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