diff options
author | Alexander Krotov <ilabdsf@gmail.com> | 2018-03-07 15:19:36 +0300 |
---|---|---|
committer | Alexander Krotov <ilabdsf@gmail.com> | 2018-03-07 15:19:36 +0300 |
commit | 1b1b6f02d59626fac591e4ed4a2286c6effca6d2 (patch) | |
tree | 5f83f9777b7fcb19a2db80c1dadfcc9c115bd522 /src | |
parent | b6182afcfe4c3381bc9286970500d4a5adfbd38d (diff) | |
download | pandoc-1b1b6f02d59626fac591e4ed4a2286c6effca6d2.tar.gz |
Muse writer: escape "-" to avoid creating bullet lists
Diffstat (limited to 'src')
-rw-r--r-- | src/Text/Pandoc/Writers/Muse.hs | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Writers/Muse.hs b/src/Text/Pandoc/Writers/Muse.hs index 404ebf7bc..ea46507db 100644 --- a/src/Text/Pandoc/Writers/Muse.hs +++ b/src/Text/Pandoc/Writers/Muse.hs @@ -287,7 +287,8 @@ conditionalEscapeString s = if any (`elem` ("#*<=>[]|" :: String)) s || "::" `isInfixOf` s || "----" `isInfixOf` s || - "~~" `isInfixOf` s + "~~" `isInfixOf` s || + "-" == s then escapeString s else s |