diff options
Diffstat (limited to 'src/Text/Pandoc/Format.hs')
| -rw-r--r-- | src/Text/Pandoc/Format.hs | 4 |
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 "-+" |