lib: note an issue with journalfieldnames ordering

This commit is contained in:
Simon Michael 2017-04-19 09:05:21 -07:00
parent 2ac77338f8
commit 48a84cdd58

View File

@ -498,22 +498,23 @@ fieldassignmentp = do
journalfieldnamep :: CsvRulesParser String journalfieldnamep :: CsvRulesParser String
journalfieldnamep = lift (pdbg 2 "trying journalfieldnamep") >> choiceInState (map string journalfieldnames) journalfieldnamep = lift (pdbg 2 "trying journalfieldnamep") >> choiceInState (map string journalfieldnames)
journalfieldnames = -- Transaction fields and pseudo fields for CSV conversion.
[-- pseudo fields: -- Names must precede any other name they contain, for the parser
"amount-in" -- (amount-in before amount; date2 before date). TODO: fix
journalfieldnames = [
"account1"
,"account2"
,"amount-in"
,"amount-out" ,"amount-out"
,"amount"
,"balance"
,"code"
,"comment"
,"currency" ,"currency"
-- standard fields:
,"date2" ,"date2"
,"date" ,"date"
,"status"
,"code"
,"description" ,"description"
,"amount" ,"status"
,"account1"
,"account2"
,"comment"
,"balance"
] ]
assignmentseparatorp :: CsvRulesParser () assignmentseparatorp :: CsvRulesParser ()