From 1cacfcea280b10184a11f8f20fd1f0a72637314c Mon Sep 17 00:00:00 2001 From: Simon Michael Date: Tue, 23 Apr 2019 07:20:10 -0700 Subject: [PATCH] lib: fix journalApplyValue test (#999) --- hledger/Hledger/Cli/Utils.hs | 4 +++- tests/0unittests/examples | 1 + 2 files changed, 4 insertions(+), 1 deletion(-) create mode 120000 tests/0unittests/examples diff --git a/hledger/Hledger/Cli/Utils.hs b/hledger/Hledger/Cli/Utils.hs index f3e19ab89..014e62d5b 100644 --- a/hledger/Hledger/Cli/Utils.hs +++ b/hledger/Hledger/Cli/Utils.hs @@ -307,8 +307,10 @@ tests_Cli_Utils = tests "Utils" [ -- Print the time required to convert one of the sample journals' amounts to value. -- Pretty clunky, but working. + -- XXX sample.journal has no price records, but is always present. + -- Change to eg examples/5000x1000x10.journal to make this useful. test "time" $ do - ej <- io $ readJournalFile definputopts "examples/3000x1000x10.journal" + ej <- io $ readJournalFile definputopts "examples/sample.journal" case ej of Left e -> crash $ T.pack e Right j -> do diff --git a/tests/0unittests/examples b/tests/0unittests/examples new file mode 120000 index 000000000..d15735c1d --- /dev/null +++ b/tests/0unittests/examples @@ -0,0 +1 @@ +../../examples \ No newline at end of file