Experimental change to charWidth in Pretty.
Hunch that this might help with #3526.
commitc59e31722471ce3a67a41413de4e6a5ecfd00ba1
authorJohn MacFarlane <jgm@berkeley.edu>
dateWed 22 Mar 2017, 15:37 (10 years ago)
parent0e68c55
src/Text/Pandoc/Pretty.hs+1
@@ -511,6 +511,7 @@ doubleQuotes = inside (char '"') (char '"')
511511-- | Returns width of a character in a monospace font: 0 for a combining
512512-- character, 1 for a regular character, 2 for an East Asian wide character.
513513charWidth :: Char -> Int
514+charWidth '\r' = 0
514515charWidth c =
515516 case c of
516517 _ | c < '\x0300' -> 1