aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorAlexander Krotov <ilabdsf@gmail.com>2018-10-06 15:21:24 +0300
committerAlexander Krotov <ilabdsf@gmail.com>2018-10-06 15:21:24 +0300
commit73afce113b4dc06bc5c1c3b36ca94f6eb24cd109 (patch)
tree040642a1cd2110e35fd8c0752637bc2482d50a43
parente257b54124f69682c237a5c9a5f99c5c72406c88 (diff)
downloadpandoc-73afce113b4dc06bc5c1c3b36ca94f6eb24cd109.tar.gz
Moved Haddock comment in Muse reader
-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)