diff options
| author | fiddlosopher <fiddlosopher@788f1e2b-df1e-0410-8736-df70ead52e1b> | 2007-07-22 18:33:41 +0000 |
|---|---|---|
| committer | fiddlosopher <fiddlosopher@788f1e2b-df1e-0410-8736-df70ead52e1b> | 2007-07-22 18:33:41 +0000 |
| commit | 9ddd464a7e6a434380a52ef69b97850e0cead138 (patch) | |
| tree | 94abd53c8c20bf7cd980f0001227a5a71035cdff | |
| parent | 4905ebadb3fbf6417b89dc9522c4a909dbdacee5 (diff) | |
Added ~ to the list of characters the markdown
writer should backslash-escape.
git-svn-id: https://pandoc.googlecode.com/svn/trunk@765 788f1e2b-df1e-0410-8736-df70ead52e1b
| -rw-r--r-- | src/Text/Pandoc/Writers/Markdown.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Writers/Markdown.hs b/src/Text/Pandoc/Writers/Markdown.hs index 707f2b346..4008d50e3 100644 --- a/src/Text/Pandoc/Writers/Markdown.hs +++ b/src/Text/Pandoc/Writers/Markdown.hs @@ -108,7 +108,7 @@ wrappedMarkdown opts sect = do -- | Escape special characters for Markdown. escapeString :: String -> String escapeString = escapeStringUsing markdownEscapes - where markdownEscapes = ('\160', " "):(backslashEscapes "`<\\*_^") + where markdownEscapes = ('\160', " "):(backslashEscapes "`<\\*_^~") -- | Convert bibliographic information into Markdown header. metaToMarkdown :: WriterOptions -> Meta -> State WriterState Doc |