diff --git a/hledger/Hledger/Cli.hs b/hledger/Hledger/Cli.hs
index bbe08b7c9..8bf90cf0e 100644
--- a/hledger/Hledger/Cli.hs
+++ b/hledger/Hledger/Cli.hs
@@ -105,6 +105,10 @@ tests_Hledger_Cli = TestList
       "expenses","expenses:food","expenses:food:dining","expenses:phone","expenses:vacation",
       "liabilities","liabilities:credit cards","liabilities:credit cards:discover"]
 
+  ,"sample journal parses" ~: do
+     _ <- samplejournal
+     assertBool "" True
+
   ,"balance report tests" ~:
    let opts `gives` es = do
         j <- samplejournal