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
This commit is contained in:
fiddlosopher 2007-07-22 18:33:41 +00:00
parent 4905ebadb3
commit 9ddd464a7e

View file

@ -108,7 +108,7 @@ wrappedMarkdown opts sect = do
-- | Escape special characters for Markdown.
escapeString :: String -> String
escapeString = escapeStringUsing markdownEscapes
where markdownEscapes = ('\160', "&nbsp;"):(backslashEscapes "`<\\*_^")
where markdownEscapes = ('\160', "&nbsp;"):(backslashEscapes "`<\\*_^~")
-- | Convert bibliographic information into Markdown header.
metaToMarkdown :: WriterOptions -> Meta -> State WriterState Doc