@@ -912,7 +912,7 @@ link = try $ do
912 guard $ not $ museInLink st
912 guard $ not $ museInLink st
913 setState $ st{ museInLink = True }
913 setState $ st{ museInLink = True }
914 (url, title, content) <- linkText
914 (url, title, content) <- linkText
915− setState $ st{ museInLink = False }
915+ updateState (\st -> st { museInLink = False })
916 return $ case stripPrefix "URL:" url of
916 return $ case stripPrefix "URL:" url of
917 Nothing -> if isImageUrl url
917 Nothing -> if isImageUrl url
918 then B.image url title <$> fromMaybe (return mempty) content
918 then B.image url title <$> fromMaybe (return mempty) content