From 6cbc0ceb0d99d8cefbaac2e9c22e81485f8e8d4c Mon Sep 17 00:00:00 2001
From: Simon Michael <simon@joyful.com>
Date: Fri, 6 May 2016 17:19:23 -0700
Subject: [PATCH] lib: note issues

---
 hledger-lib/Hledger/Query.hs    | 2 +-
 hledger/Hledger/Cli/Register.hs | 2 +-
 2 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/hledger-lib/Hledger/Query.hs b/hledger-lib/Hledger/Query.hs
index ac58d018f..08e98e79a 100644
--- a/hledger-lib/Hledger/Query.hs
+++ b/hledger-lib/Hledger/Query.hs
@@ -395,7 +395,7 @@ same [] = True
 same (a:as) = all (a==) as
 
 -- | Remove query terms (or whole sub-expressions) not matching the given
--- predicate from this query.  XXX Semantics not yet clear.
+-- predicate from this query.  XXX Semantics not completely clear.
 filterQuery :: (Query -> Bool) -> Query -> Query
 filterQuery p = simplifyQuery . filterQuery' p
 
diff --git a/hledger/Hledger/Cli/Register.hs b/hledger/Hledger/Cli/Register.hs
index 32d698657..da5bdb5cc 100644
--- a/hledger/Hledger/Cli/Register.hs
+++ b/hledger/Hledger/Cli/Register.hs
@@ -68,7 +68,7 @@ postingsReportAsCsv (_,is) =
 postingsReportItemAsCsvRecord :: PostingsReportItem -> Record
 postingsReportItemAsCsvRecord (_, _, _, p, b) = [date,desc,acct,amt,bal]
   where
-    date = showDate $ postingDate p
+    date = showDate $ postingDate p -- XXX csv should show date2 with --date2
     desc = maybe "" tdescription $ ptransaction p
     acct = bracket $ paccount p
       where