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

Addendum replace numeric to number in scheme

Browse Source 
Addendum to e0300d3 - was crashing reports
This commit is contained in:
Christopher Lam 2018-02-14 17:13:02 +08:00
parent 849b236f7b
commit 48a6938e1c
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
gnucash/report/report-system/commodity-utilities.scm
View File

@ -531,8 +531,8 @@
(define (create-commodity-list inner-comm outer-comm value-amount share-amount) (define (create-commodity-list inner-comm outer-comm value-amount share-amount)
(let ((pair (list inner-comm (let ((pair (list inner-comm
(cons (gnc:make-numeric-collector) (cons (gnc:make-number-collector)
(gnc:make-numeric-collector))))) (gnc:make-number-collector)))))
((caadr pair) 'add value-amount) ((caadr pair) 'add value-amount)
((cdadr pair) 'add share-amount) ((cdadr pair) 'add share-amount)
(set comm-list (list outer-comm (list pair))))) (set comm-list (list outer-comm (list pair)))))