From 6780c63ab318e692d308be562791ced74ee71f3c Mon Sep 17 00:00:00 2001 From: Simon Michael Date: Wed, 24 Dec 2014 14:43:49 -0800 Subject: [PATCH] simplify null Date2 queries too --- hledger-lib/Hledger/Query.hs | 1 + 1 file changed, 1 insertion(+) diff --git a/hledger-lib/Hledger/Query.hs b/hledger-lib/Hledger/Query.hs index 7683013d4..89dea091a 100644 --- a/hledger-lib/Hledger/Query.hs +++ b/hledger-lib/Hledger/Query.hs @@ -360,6 +360,7 @@ simplifyQuery q = -- all queryIsDate qs = Date $ spansUnion $ mapMaybe queryTermDateSpan qs ? | otherwise = Or $ map simplify $ filter (/=None) qs simplify (Date (DateSpan Nothing Nothing)) = Any + simplify (Date2 (DateSpan Nothing Nothing)) = Any simplify q = q tests_simplifyQuery = [