@@ -69,7 +69,6 @@ import Text.Pandoc.CSS (foldOrElse, pickStyleAttrProps)
6969import Data.Monoid ((<>))
7070import Text.Parsec.Error
7171import qualified Data.Set as Set
72−import Debug.Trace (traceShowId)
7372
7473-- | Convert HTML-formatted string to 'Pandoc' document.
7574readHtml :: ReaderOptions -- ^ Reader options
@@ -450,7 +449,7 @@ pTable = try $ do
450449 | otherwise -> r
451450 let rows = map addEmpties rows''
452451 let aligns = replicate cols AlignDefault
453− let widths = if null (traceShowId widths')
452+ let widths = if null widths'
454453 then if isSimple
455454 then replicate cols 0
456455 else replicate cols (1.0 / fromIntegral cols)