lib: doctests: refactor, include Text.*

This commit is contained in:
Simon Michael 2017-07-31 07:08:34 -07:00
parent 20442196fb
commit f4acef58b1

View File

@ -1,10 +1,14 @@
{-# LANGUAGE PackageImports #-} {-# LANGUAGE PackageImports #-}
import Data.List import Data.List
import Data.Monoid
import "Glob" System.FilePath.Glob import "Glob" System.FilePath.Glob
import Test.DocTest import Test.DocTest
main = do main =
fs1 <- filter (not . isInfixOf "/.") <$> glob "Hledger/**/*.hs" pure ["Hledger.hs"]
-- fs2 <- filter (not . isInfixOf "/.") <$> glob "other/ledger-parse/**/*.hs" <> glob "Hledger/**/*.hs"
doctest $ ["Hledger.hs"] ++ fs1 -- ++ fs2 <> glob "Text/**/*.hs"
-- <> glob "other/ledger-parse/**/*.hs"
>>= pure . filter (not . isInfixOf "/.")
>>= doctest