Require safe >= 0.3.18 and remove cpp.

This commit is contained in:
John MacFarlane 2021-03-18 21:37:56 -07:00
parent 1da6208315
commit f0e4b9cc3c
2 changed files with 1 additions and 6 deletions

View file

@ -477,7 +477,7 @@ library
parsec >= 3.1 && < 3.2,
process >= 1.2.3 && < 1.7,
random >= 1 && < 1.3,
safe >= 0.3 && < 0.4,
safe >= 0.3.18 && < 0.4,
scientific >= 0.3 && < 0.4,
skylighting >= 0.10.4.1 && < 0.11,
skylighting-core >= 0.10.4.1 && < 0.11,

View file

@ -1,4 +1,3 @@
{-# LANGUAGE CPP #-}
{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE PatternGuards #-}
{-# LANGUAGE ScopedTypeVariables #-}
@ -97,11 +96,7 @@ parseLaTeX = do
let doc' = doc bs
let headerLevel (Header n _ _) = [n]
headerLevel _ = []
#if MIN_VERSION_safe(0,3,18)
let bottomLevel = minimumBound 1 $ query headerLevel doc'
#else
let bottomLevel = minimumDef 1 $ query headerLevel doc'
#endif
let adjustHeaders m (Header n attr ils) = Header (n+m) attr ils
adjustHeaders _ x = x
let (Pandoc _ bs') =