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

2001-09-02 Christian Stimming <stimming@tuhh.de>

Browse Source 
* src/report/standard-reports/average-balance.scm: Ben Stanley
	<bds02@uow.edu.au>'s report fix.


git-svn-id: svn+ssh://svn.gnucash.org/repo/gnucash/trunk@5260 57a11ea4-9604-0410-9ed3-97b8803252fd
This commit is contained in:
Christian Stimming
2001-09-02 13:03:13 +00:00
parent c5106fd497
commit b8001983f4
2 changed files with 8 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
ChangeLog
View File

@@ -1,3 +1,8 @@
2001-09-02 Christian Stimming <stimming@tuhh.de>
* src/report/standard-reports/average-balance.scm: Ben Stanley
<bds02@uow.edu.au>'s report fix.
2001-08-31 Dave Peticolas <dave@krondo.com>
* src/engine/Scrub.c: don't create accounts with no currency

4
src/report/standard-reports/average-balance.scm
View File

@@ -421,6 +421,8 @@
(if (memq 'GLPlot plot-type)
(let ((debit-data
(map (lambda (row) list-ref row 5) data))
(number-data
(map (lambda (row) (list-ref row 7)) data))
(credit-data
(map (lambda (row) list-ref row 6) data)))
;; debit column
@@ -446,7 +448,7 @@
(list (list-ref columns 6))))
(set! col-colors
(append col-colors (list "red")))
(set all-zeros? #f)))))
(set! all-zeros? #f)))))
(if (not all-zeros?)
(begin