summaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
authorAlexander Krotov <ilabdsf@gmail.com>2018-02-20 14:37:02 +0300
committerAlexander Krotov <ilabdsf@gmail.com>2018-02-20 14:37:02 +0300
commita16382b06b860e2d4a7284527b6fda0167cffa61 (patch)
tree272ba127406d46fa97d6750810ee2d165581c2bb /src
parentf6eac1ad7e5583e107c29aeb011483ef0500952c (diff)
Muse reader: use updateState instead of setState to restore museInLink
Diffstat (limited to 'src')
-rw-r--r--src/Text/Pandoc/Readers/Muse.hs2
1 files changed, 1 insertions, 1 deletions
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