diff --git a/hledger-lib/tests/doctests.hs b/hledger-lib/tests/doctests.hs
index 82b666c50..179be0bb6 100644
--- a/hledger-lib/tests/doctests.hs
+++ b/hledger-lib/tests/doctests.hs
@@ -5,10 +5,8 @@ import Data.Monoid
 import "Glob" System.FilePath.Glob
 import Test.DocTest
 
-main =
-     pure ["Hledger.hs"]
-  <> glob "Hledger/**/*.hs" 
-  <> glob "Text/**/*.hs"
-  -- <> glob "other/ledger-parse/**/*.hs"
-  >>= pure . filter (not . isInfixOf "/.") 
-  >>= doctest
+main = do
+  fs1 <- glob "Hledger/**/*.hs"
+  fs2 <- glob "Text/**/*.hs"
+  --fs3 <- glob "other/ledger-parse/**/*.hs"
+  doctest $ filter (not . isInfixOf "/.") $ ["Hledger.hs"] ++ fs1 ++ fs2