diff options
| author | John MacFarlane <jgm@berkeley.edu> | 2022-10-19 12:46:15 -0700 |
|---|---|---|
| committer | John MacFarlane <jgm@berkeley.edu> | 2022-10-19 12:46:15 -0700 |
| commit | ec278d2b60e329040c712b51c32fddbcd180191b (patch) | |
| tree | e05ef4bd816c1c5e9afc5a8deed8b68f55865999 /src/Text/Pandoc/App/Opt.hs | |
| parent | fe137c9d403b78eb508c6514c9234eb8fe4d77d1 (diff) | |
Text.Pandoc.Shared: remove `ordNub` [API change].
This is just `nubOrd` from Data.Containers.ListUtils.
Diffstat (limited to 'src/Text/Pandoc/App/Opt.hs')
| -rw-r--r-- | src/Text/Pandoc/App/Opt.hs | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/src/Text/Pandoc/App/Opt.hs b/src/Text/Pandoc/App/Opt.hs index 9ecf7e7ae..710df3200 100644 --- a/src/Text/Pandoc/App/Opt.hs +++ b/src/Text/Pandoc/App/Opt.hs @@ -43,7 +43,8 @@ import Text.Pandoc.Options (TopLevelDivision (TopLevelDefault), import Text.Pandoc.Class (readFileStrict, fileExists, setVerbosity, report, PandocMonad(lookupEnv), getUserDataDir) import Text.Pandoc.Error (PandocError (PandocParseError, PandocSomeError)) -import Text.Pandoc.Shared (findM, ordNub) +import Text.Pandoc.Shared (findM) +import Data.Containers.ListUtils (nubOrd) import Text.Pandoc.Data (defaultUserDataDir) import qualified Text.Pandoc.Parsing as P import Text.Pandoc.Readers.Metadata (yamlMap) @@ -816,4 +817,4 @@ expand ps ns n = concatMap (ext n ns) ps cyclic :: Ord a => [[a]] -> Bool cyclic = any hasDuplicate where - hasDuplicate xs = length (ordNub xs) /= length xs + hasDuplicate xs = length (nubOrd xs) /= length xs |