diff options
author | Alexander Krotov <ilabdsf@gmail.com> | 2018-10-06 15:21:24 +0300 |
---|---|---|
committer | Alexander Krotov <ilabdsf@gmail.com> | 2018-10-06 15:21:24 +0300 |
commit | 73afce113b4dc06bc5c1c3b36ca94f6eb24cd109 (patch) | |
tree | 040642a1cd2110e35fd8c0752637bc2482d50a43 | |
parent | e257b54124f69682c237a5c9a5f99c5c72406c88 (diff) | |
download | pandoc-73afce113b4dc06bc5c1c3b36ca94f6eb24cd109.tar.gz |
Moved Haddock comment in Muse reader
-rw-r--r-- | src/Text/Pandoc/Readers/Muse.hs | 7 |
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) |