diff options
-rw-r--r-- | Text/Pandoc/Writers/Markdown.hs | 2 | ||||
-rw-r--r-- | tests/writer.markdown | 6 |
2 files changed, 4 insertions, 4 deletions
diff --git a/Text/Pandoc/Writers/Markdown.hs b/Text/Pandoc/Writers/Markdown.hs index 556be70cf..577e700da 100644 --- a/Text/Pandoc/Writers/Markdown.hs +++ b/Text/Pandoc/Writers/Markdown.hs @@ -100,7 +100,7 @@ noteToMarkdown opts num blocks = do -- | Escape special characters for Markdown. escapeString :: String -> String escapeString = escapeStringUsing markdownEscapes - where markdownEscapes = ('\160', " "):(backslashEscapes "`<\\*_^~") + where markdownEscapes = backslashEscapes "`<\\*_^~" -- | Convert bibliographic information into Markdown header. metaToMarkdown :: WriterOptions -> Meta -> State WriterState Doc diff --git a/tests/writer.markdown b/tests/writer.markdown index 00c75e607..41a116e9a 100644 --- a/tests/writer.markdown +++ b/tests/writer.markdown @@ -269,7 +269,7 @@ Autonumbering: Should not be a list item: -M.A. 2007 +M.A. 2007 B. Williams @@ -457,9 +457,9 @@ This is code: `>`, `$`, `\`, `\$`, `<html>`. ~~This is *strikeout*.~~ -Superscripts: a^bc^d a^*hello*^ a^hello there^. +Superscripts: a^bc^d a^*hello*^ a^hello there^. -Subscripts: H~2~O, H~23~O, H~many of them~O. +Subscripts: H~2~O, H~23~O, H~many of them~O. These should not be superscripts or subscripts, because of the unescaped spaces: a\^b c\^d, a\~b c\~d. |