aboutsummaryrefslogtreecommitdiff
path: root/src/Text/Pandoc
diff options
context:
space:
mode:
Diffstat (limited to 'src/Text/Pandoc')
-rw-r--r--src/Text/Pandoc/Readers/Muse.hs7
1 files changed, 3 insertions, 4 deletions
diff --git a/src/Text/Pandoc/Readers/Muse.hs b/src/Text/Pandoc/Readers/Muse.hs
index 418ba71f2..134598c07 100644
--- a/src/Text/Pandoc/Readers/Muse.hs
+++ b/src/Text/Pandoc/Readers/Muse.hs
@@ -98,12 +98,11 @@ instance Default MuseState where
}
data MuseEnv =
- MuseEnv { museInLink :: Bool }
+ MuseEnv { museInLink :: Bool -- ^ True when parsing a link description to avoid nested links
+ }
instance Default MuseEnv where
- def = MuseEnv { museInLink = False
- -- True when parsing a link description to avoid nested links
- }
+ def = MuseEnv { museInLink = False }
type MuseParser m = ParserT Text MuseState (ReaderT MuseEnv m)