Bug 797462 - gnc:strify reports the amount and value incorrectly

amt and val were incorrectly labelled. swap to match label.
This commit is contained in:
Christopher Lam 2019-10-18 18:29:16 +08:00
parent 1a8c2f2801
commit c7c76c2e0b

View File

@ -1113,15 +1113,15 @@ flawed. see report-utilities.scm. please update reports.")
(format #f "Split<d:~a,acc:~a,amt:~a,val:~a>"
(qof-print-date (xaccTransGetDate txn))
(xaccAccountGetName (xaccSplitGetAccount spl))
(gnc:monetary->string
(gnc:make-gnc-monetary
(xaccTransGetCurrency txn)
(xaccSplitGetValue spl)))
(gnc:monetary->string
(gnc:make-gnc-monetary
(xaccAccountGetCommodity
(xaccSplitGetAccount spl))
(xaccSplitGetAmount spl))))))
(xaccSplitGetAmount spl)))
(gnc:monetary->string
(gnc:make-gnc-monetary
(xaccTransGetCurrency txn)
(xaccSplitGetValue spl))))))
(define (trans->str txn)
(format #f "Txn<d:~a>" (qof-print-date (xaccTransGetDate txn))))
(define (account->str acc)