IntenseFinance/gnucash
3
0
Fork 0
mirror of https://github.com/Gnucash/gnucash.git synced 2025-02-25 18:55:30 -06:00
Code Issues Packages Projects Releases Wiki Activity

[balsheet-pnl] fix balsheet->networth barchart link

Browse Source 
def0caa011 had error.
This commit is contained in:
Christopher Lam 2020-06-13 22:17:04 +08:00
parent 2eb9814604
commit 28df0c091d
1 changed files with 12 additions and 12 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

24
gnucash/report/reports/standard/balsheet-pnl.scm
View File

@ -1035,18 +1035,18 @@ also show overall period profit & loss."))
common-currency price-source date)
(income-expense-balance 'format gnc:make-gnc-monetary #f)))))
(chart (and-let* (include-chart?
(not (eq? incr 'disabled))
(curr (or common-currency book-main-currency))
(price (or price-source 'pricedb-nearest)))
(gnc:make-report-anchor
networth-barchart-uuid report-obj
(list (list "General" "Start Date" (cons 'absolute startdate))
(list "General" "End Date" (cons 'absolute enddate))
(list "General" "Report's currency" curr)
(list "General" "Step Size" incr)
(list "General" "Price Source" price)
(list "Accounts" "Accounts" asset-liability)))))
(chart
(and include-chart? (not (eq? incr 'disabled))
(let ((chart-currency (or common-currency book-main-currency))
(price-source (or price-source 'pricedb-nearest)))
(gnc:make-report-anchor
networth-barchart-uuid report-obj
(list (list "General" "Start Date" (cons 'absolute startdate))
(list "General" "End Date" (cons 'absolute enddate))
(list "General" "Report's currency" chart-currency)
(list "General" "Step Size" incr)
(list "General" "Price Source" price-source)
(list "Accounts" "Accounts" asset-liability))))))
(get-col-header-fn
(lambda (accounts col-idx)