From ae68836352afae134510b93b29983cb207fa37d0 Mon Sep 17 00:00:00 2001 From: John MacFarlane Date: Fri, 28 Sep 2012 23:37:41 -0400 Subject: Textile reader: Avoid parsing dashes as strikeout. Previously the input text-- text-- text-- text-- would be parsed with strikeouts rather than dashes. This fixes the problem by requiring that a strikeout delimiting - not be followed by a -. Closes #631. --- src/Text/Pandoc/Readers/Textile.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'src/Text/Pandoc/Readers/Textile.hs') diff --git a/src/Text/Pandoc/Readers/Textile.hs b/src/Text/Pandoc/Readers/Textile.hs index 170ccc2c7..0d516f545 100644 --- a/src/Text/Pandoc/Readers/Textile.hs +++ b/src/Text/Pandoc/Readers/Textile.hs @@ -374,7 +374,7 @@ inlineMarkup = choice [ simpleInline (string "??") (Cite []) , simpleInline (char '*') Strong , simpleInline (char '_') Emph , simpleInline (char '+') Emph -- approximates underline - , simpleInline (char '-') Strikeout + , simpleInline (char '-' <* notFollowedBy (char '-')) Strikeout , simpleInline (char '^') Superscript , simpleInline (char '~') Subscript ] -- cgit v1.2.3