diff options
| author | Alexander Krotov <ilabdsf@gmail.com> | 2017-11-22 16:01:57 +0300 |
|---|---|---|
| committer | Alexander Krotov <ilabdsf@gmail.com> | 2017-11-22 16:17:30 +0300 |
| commit | 454062eccdcc0047e6134bdd4d86c2debb0b3ce7 (patch) | |
| tree | bd6dbd2857a81fd1db3027a04bc40ac5d19ab5bc /src/Text/Pandoc | |
| parent | c8ab4789b63422d27b03379ceea413e3fcffd577 (diff) | |
| download | pandoc-454062eccdcc0047e6134bdd4d86c2debb0b3ce7.tar.gz | |
Muse writer: escape hash symbol
Diffstat (limited to 'src/Text/Pandoc')
| -rw-r--r-- | src/Text/Pandoc/Writers/Muse.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Writers/Muse.hs b/src/Text/Pandoc/Writers/Muse.hs index 8963c7ce4..a6ef28ba7 100644 --- a/src/Text/Pandoc/Writers/Muse.hs +++ b/src/Text/Pandoc/Writers/Muse.hs @@ -285,7 +285,7 @@ escapeString s = -- | Escape special characters for Muse if needed. conditionalEscapeString :: String -> String conditionalEscapeString s = - if any (`elem` ("*<=>[]|" :: String)) s || + if any (`elem` ("#*<=>[]|" :: String)) s || "::" `isInfixOf` s || "----" `isInfixOf` s then escapeString s |