Tissevert/pandoc
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions 1

Removed debug trace from HTML reader.

Browse source
This commit is contained in:
John MacFarlane 2016-12-08 11:06:50 +01:00
parent afa675b71e
commit 6708c6a7fc
1 changed files with 1 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
src/Text/Pandoc/Readers/HTML.hs
View file

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