mirror of
https://github.com/simonmichael/hledger.git
synced 2024-09-20 02:37:12 +03:00
extra/hledger-register-csv: fix breakage from aa85e786
This commit is contained in:
parent
d1618aaca8
commit
1e54797d49
@ -41,7 +41,7 @@ postingsReportAsCsv (_,is) =
|
|||||||
map postingsReportItemAsCsvRecord is
|
map postingsReportItemAsCsvRecord is
|
||||||
|
|
||||||
postingsReportItemAsCsvRecord :: PostingsReportItem -> Record
|
postingsReportItemAsCsvRecord :: PostingsReportItem -> Record
|
||||||
postingsReportItemAsCsvRecord (_, _, p, b) = [date,desc,acct,amt,bal]
|
postingsReportItemAsCsvRecord (_, _, _, p, b) = [date,desc,acct,amt,bal]
|
||||||
where
|
where
|
||||||
date = showDate $ postingDate p
|
date = showDate $ postingDate p
|
||||||
desc = maybe "" tdescription $ ptransaction p
|
desc = maybe "" tdescription $ ptransaction p
|
||||||
|
Loading…
Reference in New Issue
Block a user