diff options
author | fiddlosopher <fiddlosopher@788f1e2b-df1e-0410-8736-df70ead52e1b> | 2008-07-11 02:15:10 +0000 |
---|---|---|
committer | fiddlosopher <fiddlosopher@788f1e2b-df1e-0410-8736-df70ead52e1b> | 2008-07-11 02:15:10 +0000 |
commit | a85dfb83bb9e3394149962a0f7600220c5a83c25 (patch) | |
tree | 2ac013b91a78c6d952b0832c6d0799cd1f6d5a6b | |
parent | 824bb2d22e40e035703ccf6ec7fd6bcde51950ce (diff) | |
download | pandoc-a85dfb83bb9e3394149962a0f7600220c5a83c25.tar.gz |
Print unicode \160 literally in markdown writer, rather than as .
git-svn-id: https://pandoc.googlecode.com/svn/trunk@1299 788f1e2b-df1e-0410-8736-df70ead52e1b
-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. |