aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorfiddlosopher <fiddlosopher@788f1e2b-df1e-0410-8736-df70ead52e1b>2008-07-11 02:15:10 +0000
committerfiddlosopher <fiddlosopher@788f1e2b-df1e-0410-8736-df70ead52e1b>2008-07-11 02:15:10 +0000
commita85dfb83bb9e3394149962a0f7600220c5a83c25 (patch)
tree2ac013b91a78c6d952b0832c6d0799cd1f6d5a6b
parent824bb2d22e40e035703ccf6ec7fd6bcde51950ce (diff)
downloadpandoc-a85dfb83bb9e3394149962a0f7600220c5a83c25.tar.gz
Print unicode \160 literally in markdown writer, rather than as &nbsp;.
git-svn-id: https://pandoc.googlecode.com/svn/trunk@1299 788f1e2b-df1e-0410-8736-df70ead52e1b
-rw-r--r--Text/Pandoc/Writers/Markdown.hs2
-rw-r--r--tests/writer.markdown6
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', "&nbsp;"):(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.&nbsp;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&nbsp;there^.
+Superscripts: a^bc^d a^*hello*^ a^hello there^.
-Subscripts: H~2~O, H~23~O, H~many&nbsp;of&nbsp;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.