git.iko.soy/typeable/pandoc
on master help sign in
Docx reader: make all compilers happy with traversable.

The last attempt to make 7.8 happy made 7.10 unhappy. So we need some conditional logic to appease all versions.

commitabc4bca46bbebc81bfa78c96aa594ae48dfea2f0 authorJesse Rosenthal <jrosenthal@jhu.edu> dateMon 29 Aug 2016, 22:35 (10 years ago) parent773adc7
1 file changed+3−1
compare with master
unifiedsplit
src/Text/Pandoc/Readers/Docx.hs+3−1
src/Text/Pandoc/Readers/Docx.hs+3−1
@@ -1,4 +1,4 @@
1−{-# LANGUAGE PatternGuards, OverloadedStrings #-}
1+{-# LANGUAGE PatternGuards, OverloadedStrings, CPP #-}
22
33{-
44Copyright (C) 2014-2016 Jesse Rosenthal <jrosenthal@jhu.edu>
@@ -93,7 +93,9 @@ import Control.Monad.Reader
9393import Control.Monad.State
9494import Data.Sequence (ViewL(..), viewl)
9595import qualified Data.Sequence as Seq (null)
96+#if !(MIN_VERSION_base(4,8,0))
9697import Data.Traversable (traverse)
98+#endif
9799
98100import Text.Pandoc.Error
99101import Text.Pandoc.Compat.Except