From 79a17ef9b9066c3b34e22d7e0ac54ae0bc6800e4 Mon Sep 17 00:00:00 2001
From: John MacFarlane <fiddlosopher@gmail.com>
Date: Sat, 19 May 2012 17:44:15 -0700
Subject: Markdown Use a nonzero space to prevent false recognition of list
 marker.

This addresses #516, but in a rather hackish way.  There ought to
be a better solution.
---
 src/Text/Pandoc/Writers/Markdown.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'src/Text/Pandoc/Writers')

diff --git a/src/Text/Pandoc/Writers/Markdown.hs b/src/Text/Pandoc/Writers/Markdown.hs
index a95c0ba7b..9cbcaeb47 100644
--- a/src/Text/Pandoc/Writers/Markdown.hs
+++ b/src/Text/Pandoc/Writers/Markdown.hs
@@ -218,7 +218,7 @@ blockToMarkdown opts (Para inlines) = do
   let esc = if (not (writerStrictMarkdown opts)) &&
                not (stPlain st) &&
                beginsWithOrderedListMarker (render Nothing contents)
-               then text "\\"
+               then text "\x200B" -- zero-width space, a hack
                else empty
   return $ esc <> contents <> blankline
 blockToMarkdown _ (RawBlock f str)
-- 
cgit v1.2.3