mirror of
https://github.com/jgm/pandoc.git
synced 2026-08-26 10:16:32 +00:00
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.
This commit is contained in:
@@ -1,4 +1,4 @@
|
||||
{-# LANGUAGE PatternGuards, OverloadedStrings #-}
|
||||
{-# LANGUAGE PatternGuards, OverloadedStrings, CPP #-}
|
||||
|
||||
{-
|
||||
Copyright (C) 2014-2016 Jesse Rosenthal <jrosenthal@jhu.edu>
|
||||
@@ -93,7 +93,9 @@ import Control.Monad.Reader
|
||||
import Control.Monad.State
|
||||
import Data.Sequence (ViewL(..), viewl)
|
||||
import qualified Data.Sequence as Seq (null)
|
||||
#if !(MIN_VERSION_base(4,8,0))
|
||||
import Data.Traversable (traverse)
|
||||
#endif
|
||||
|
||||
import Text.Pandoc.Error
|
||||
import Text.Pandoc.Compat.Except
|
||||
|
||||
Reference in New Issue
Block a user