From 9437ab449c8f8bf50f4c8a7f08156d2c1aea604a Mon Sep 17 00:00:00 2001
From: John MacFarlane <jgm@berkeley.edu>
Date: Wed, 22 Mar 2017 16:08:09 +0100
Subject: Revert "Experimental change to charWidth in Pretty."

This reverts commit c59e31722471ce3a67a41413de4e6a5ecfd00ba1.
---
 src/Text/Pandoc/Pretty.hs | 1 -
 1 file changed, 1 deletion(-)

(limited to 'src/Text')

diff --git a/src/Text/Pandoc/Pretty.hs b/src/Text/Pandoc/Pretty.hs
index 73d698001..32e60843c 100644
--- a/src/Text/Pandoc/Pretty.hs
+++ b/src/Text/Pandoc/Pretty.hs
@@ -511,7 +511,6 @@ doubleQuotes = inside (char '"') (char '"')
 -- | Returns width of a character in a monospace font:  0 for a combining
 -- character, 1 for a regular character, 2 for an East Asian wide character.
 charWidth :: Char -> Int
-charWidth '\r' = 0
 charWidth c =
   case c of
       _ | c <  '\x0300'                    -> 1
-- 
cgit v1.2.3