diff options
author | Alexander Krotov <ilabdsf@gmail.com> | 2018-01-17 12:30:15 +0300 |
---|---|---|
committer | Alexander Krotov <ilabdsf@gmail.com> | 2018-01-19 01:50:17 +0300 |
commit | 7e2c75c8653eb9ec64a19ac7d6f4677936fbb13b (patch) | |
tree | 082c64e8a27bd7bdc599a92c2317b8d830dbe009 /src/Text | |
parent | d0a895acee371b13a9c31873c10dd124e04564d1 (diff) | |
download | pandoc-7e2c75c8653eb9ec64a19ac7d6f4677936fbb13b.tar.gz |
Muse reader: do not remove trailing whitespace from <code>
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 d378fe676..f0ac81f01 100644 --- a/src/Text/Pandoc/Readers/Muse.hs +++ b/src/Text/Pandoc/Readers/Muse.hs @@ -728,7 +728,7 @@ code = try $ do codeTag :: PandocMonad m => MuseParser m (F Inlines) codeTag = do - (attrs, content) <- parseHtmlContentWithAttrs "code" anyChar + (attrs, content) <- htmlElement "code" return $ return $ B.codeWith attrs content inlineLiteralTag :: PandocMonad m => MuseParser m (F Inlines) |