aboutsummaryrefslogtreecommitdiff
path: root/src/Text/Pandoc/Format.hs
diff options
context:
space:
mode:
authorJohn MacFarlane <[email protected]>2025-12-12 10:32:17 +0100
committerJohn MacFarlane <[email protected]>2025-12-12 10:32:17 +0100
commitd5e100eec2ecaddfb8f099b6dad5d0c7c05ac06b (patch)
tree8b44c847034e99a2d37aea895141a168f602f132 /src/Text/Pandoc/Format.hs
parentff3eda71eb9567df679721c9bf506b0fecd25d9f (diff)
Fix imports to avoid warning about foldl'.
`foldl'` is exported by Prelude by base 4.20+. So we need to do some qualified importing to avoid warnings about redundant imports.
Diffstat (limited to 'src/Text/Pandoc/Format.hs')
-rw-r--r--src/Text/Pandoc/Format.hs4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/Text/Pandoc/Format.hs b/src/Text/Pandoc/Format.hs
index 5b87a2531..788e2db4d 100644
--- a/src/Text/Pandoc/Format.hs
+++ b/src/Text/Pandoc/Format.hs
@@ -22,7 +22,7 @@ module Text.Pandoc.Format
import Control.Monad.Except (throwError)
import Data.Char (toLower)
import Data.Foldable (asum)
-import Data.List (foldl')
+import qualified Data.List as L
import System.FilePath (splitExtension, takeExtension)
import Text.Pandoc.Class (PandocMonad)
import Text.Pandoc.Error (PandocError (..))
@@ -142,7 +142,7 @@ parseFlavoredFormat spec =
pExtensionsDiff :: (UpdateSourcePos s Char, Stream s m Char)
=> ParsecT s u m ExtensionsDiff
-pExtensionsDiff = foldl' (flip ($)) mempty <$> many extMod
+pExtensionsDiff = L.foldl' (flip ($)) mempty <$> many extMod
where
extMod = do
polarity <- oneOf "-+"