@@ -735,15 +735,15 @@ many1TillNOrLessNewlines n p end = try $
736-- | Chars allowed to occur before emphasis (spaces and newlines are ok, too)
736-- | Chars allowed to occur before emphasis (spaces and newlines are ok, too)
737emphasisPreChars :: [Char]
737emphasisPreChars :: [Char]
738−emphasisPreChars = "\t \"'({"
738+emphasisPreChars = "-\t ('\"{"
740-- | Chars allowed at after emphasis
740-- | Chars allowed at after emphasis
741emphasisPostChars :: [Char]
741emphasisPostChars :: [Char]
742−emphasisPostChars = "\t\n !\"'),-.:;?\\}["
742+emphasisPostChars = "-\t\n .,:!?;'\")}["
744-- | Chars not allowed at the (inner) border of emphasis
744-- | Chars not allowed at the (inner) border of emphasis
745emphasisForbiddenBorderChars :: [Char]
745emphasisForbiddenBorderChars :: [Char]
746−emphasisForbiddenBorderChars = "\t\n\r \"',"
746+emphasisForbiddenBorderChars = "\t\n\r "
748-- | The maximum number of newlines within
748-- | The maximum number of newlines within
749emphasisAllowedNewlines :: Int
749emphasisAllowedNewlines :: Int