diff options
author | Alexander Krotov <ilabdsf@gmail.com> | 2018-02-20 14:37:02 +0300 |
---|---|---|
committer | Alexander Krotov <ilabdsf@gmail.com> | 2018-02-20 14:37:02 +0300 |
commit | a16382b06b860e2d4a7284527b6fda0167cffa61 (patch) | |
tree | 272ba127406d46fa97d6750810ee2d165581c2bb /src/Text | |
parent | f6eac1ad7e5583e107c29aeb011483ef0500952c (diff) | |
download | pandoc-a16382b06b860e2d4a7284527b6fda0167cffa61.tar.gz |
Muse reader: use updateState instead of setState to restore museInLink
Diffstat (limited to 'src/Text')
-rw-r--r-- | src/Text/Pandoc/Readers/Muse.hs | 2 |
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 |